(binhex-decode-region-internal): Use set-buffer-multibyte rather than

setting default-enable-multibyte-characters.

1 files changed, 2 insertions, 2 deletions

diff --git a/lisp/mail/binhex.el b/lisp/mail/binhex.el
index 7b83c978bab..f8b869a7bf1 100644
--- a/lisp/mail/binhex.el
+++ b/lisp/mail/binhex.el
@@ -222,8 +222,8 @@ If HEADER-ONLY is non-nil only decode header and return filename."
         (save-excursion
           (goto-char start)
           (when (re-search-forward binhex-begin-line end t)
-            (let (default-enable-multibyte-characters)
-              (setq work-buffer (generate-new-buffer " *binhex-work*")))
+            (setq work-buffer (generate-new-buffer " *binhex-work*"))
+            (with-current-buffer work-buffer (set-buffer-multibyte nil))
             (beginning-of-line)
             (setq bits 0 counter 0)
             (while tmp