(uncompface): Make buffer unibyte.

diff --git a/lisp/gnus/ChangeLog b/lisp/gnus/ChangeLog
index 4047037cb721fb7bf0574ee8baf49d5dd79dfd31..535271a2556a3adbb64a90c6c424741aefea1830 100644 (file)
--- a/lisp/gnus/ChangeLog
+++ b/lisp/gnus/ChangeLog
@@ -1,3 +1,7 @@
+2008-04-08  Katsumi Yamaoka  <yamaoka@jpl.org>
+
+       * compface.el (uncompface): Make buffer unibyte.
+
 2008-04-07  Stefan Monnier  <monnier@iro.umontreal.ca>
 
        * mail-source.el (mail-source-value):

diff --git a/lisp/gnus/compface.el b/lisp/gnus/compface.el
index 2f81ab0238e9624bf62c8b4e219d58244224b6cc..34f60cd024b676a042f9a9dd62744043bc2ef25f 100644 (file)
--- a/lisp/gnus/compface.el
+++ b/lisp/gnus/compface.el
@@ -33,6 +33,7 @@ Requires the external programs `uncompface', and `icontopbm'.  On a
 GNU/Linux system these might be in packages with names like `compface'
 or `faces-xface' and `netpbm' or `libgr-progs', for instance."
   (with-temp-buffer
+    (unless (featurep 'xemacs) (set-buffer-multibyte nil))
     (insert face)
     (let ((coding-system-for-read 'raw-text)
          ;; At least "icontopbm" doesn't work with Windows because