changeset 93725:2ca2b5f1a567

(gnus-x-splash): Avoid binding default-enable-multibyte-characters.
author Stefan Monnier <monnier@iro.umontreal.ca>
date Sat, 05 Apr 2008 20:08:27 +0000
parents ed8dca79d6ab
children 3e95f26e3241
files lisp/gnus/ChangeLog lisp/gnus/gnus-ems.el
diffstat 2 files changed, 5 insertions(+), 2 deletions(-) [+]
line wrap: on
line diff
--- a/lisp/gnus/ChangeLog	Sat Apr 05 20:07:27 2008 +0000
+++ b/lisp/gnus/ChangeLog	Sat Apr 05 20:08:27 2008 +0000
@@ -1,5 +1,8 @@
 2008-04-05  Stefan Monnier  <monnier@iro.umontreal.ca>
 
+	* gnus-ems.el (gnus-x-splash): Prefer mm-disable-multibyte to
+	default-enable-multibyte-characters.
+
 	* gnus-fun.el (gnus-display-x-face-in-from): Remove unnecessary use of
 	default-enable-multibyte-characters.
 
--- a/lisp/gnus/gnus-ems.el	Sat Apr 05 20:07:27 2008 +0000
+++ b/lisp/gnus/gnus-ems.el	Sat Apr 05 20:08:27 2008 +0000
@@ -179,9 +179,9 @@
     (sit-for 0) ;; Necessary for measuring the window size correctly.
     (when (and file
 	       (ignore-errors
-		(let ((coding-system-for-read 'raw-text)
-		      default-enable-multibyte-characters)
+		(let ((coding-system-for-read 'raw-text))
 		  (with-temp-buffer
+                    (mm-disable-multibyte)
 		    (insert-file-contents file)
 		    (goto-char (point-min))
 		    (setq pixmap (read (current-buffer)))))))