diff options
author | Stefan Monnier <monnier@iro.umontreal.ca> | 2010-04-23 12:15:51 -0400 |
---|---|---|
committer | Stefan Monnier <monnier@iro.umontreal.ca> | 2010-04-23 12:15:51 -0400 |
commit | bd486b039f9478afaff25e358b9e2c615e39f5c6 (patch) | |
tree | 2054f94c257d0c68794e4a7e52b2a48c32c98709 /lisp/gnus/yenc.el | |
parent | 3b548e1b3acf989c1bb866348f6dcff3d9a25d27 (diff) | |
download | emacs-bd486b039f9478afaff25e358b9e2c615e39f5c6.tar.gz emacs-bd486b039f9478afaff25e358b9e2c615e39f5c6.tar.bz2 emacs-bd486b039f9478afaff25e358b9e2c615e39f5c6.zip |
* mm-util.el (mm-find-buffer-file-coding-system):
* yenc.el (yenc-decode-region): Don't let-bind a read-only variable.
Diffstat (limited to 'lisp/gnus/yenc.el')
-rw-r--r-- | lisp/gnus/yenc.el | 5 |
1 files changed, 3 insertions, 2 deletions
diff --git a/lisp/gnus/yenc.el b/lisp/gnus/yenc.el index b0f7b4115b2..8cb522c4ec7 100644 --- a/lisp/gnus/yenc.el +++ b/lisp/gnus/yenc.el @@ -89,8 +89,9 @@ (when (re-search-forward "^=yend.*$" end t) (setq last (match-beginning 0)) (setq footer-alist (yenc-parse-line (match-string 0))) - (letf (((default-value 'enable-multibyte-characters) nil)) - (setq work-buffer (generate-new-buffer " *yenc-work*"))) + (with-current-buffer + (setq work-buffer (generate-new-buffer " *yenc-work*")) + (set-buffer-multibyte nil)) (while (< first last) (setq char (char-after first)) (cond ((or (eq char ?\r) |