summaryrefslogtreecommitdiff
path: root/lisp/gnus/yenc.el
diff options
context:
space:
mode:
authorStefan Monnier <monnier@iro.umontreal.ca>2010-04-23 12:15:51 -0400
committerStefan Monnier <monnier@iro.umontreal.ca>2010-04-23 12:15:51 -0400
commitbd486b039f9478afaff25e358b9e2c615e39f5c6 (patch)
tree2054f94c257d0c68794e4a7e52b2a48c32c98709 /lisp/gnus/yenc.el
parent3b548e1b3acf989c1bb866348f6dcff3d9a25d27 (diff)
downloademacs-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.el5
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)