(uncompface): Make buffer, in which uncompface program runs, unibyte.

diff --git a/contrib/ChangeLog b/contrib/ChangeLog
index c308528..2881cbe 100644 (file)
--- a/contrib/ChangeLog
+++ b/contrib/ChangeLog
@@ -1,3 +1,8 @@
+2008-05-25  Katsumi Yamaoka  <yamaoka@jpl.org>
+
+       * compface.el (uncompface): Make buffer, in which uncompface program
+       runs, unibyte.
+
 2008-05-19  Teodor Zlatanov  <tzz@lifelogs.com>
 
        * mail/smtpmail.el: Add autoload for `auth-source-user-or-password'.

diff --git a/contrib/compface.el b/contrib/compface.el
index 11612d5..4408af4 100644 (file)
--- a/contrib/compface.el
+++ b/contrib/compface.el
@@ -80,6 +80,7 @@ or `libgr-progs', for instance."
         (uncompface-internal face))
        ((eq uncompface-use-external t)
         (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