summaryrefslogtreecommitdiff
path: root/lisp/gnus/rfc2047.el
diff options
context:
space:
mode:
authorStefan Monnier <monnier@iro.umontreal.ca>2004-05-07 16:10:25 +0000
committerStefan Monnier <monnier@iro.umontreal.ca>2004-05-07 16:10:25 +0000
commit7daa20fca46a6dbce0cbca0a935a2798e210237e (patch)
tree52cd1073b085e94720374e12e73defd56a15b863 /lisp/gnus/rfc2047.el
parente89e3726982a98222a82b3798722d36cd976b047 (diff)
downloademacs-7daa20fca46a6dbce0cbca0a935a2798e210237e.tar.gz
(rfc2047-encode-message-header): Don't encode non-address
headers as address headers (which breaks if subject has a single ").
Diffstat (limited to 'lisp/gnus/rfc2047.el')
-rw-r--r--lisp/gnus/rfc2047.el4
1 files changed, 2 insertions, 2 deletions
diff --git a/lisp/gnus/rfc2047.el b/lisp/gnus/rfc2047.el
index 7c93160c455..f355ac8bbb4 100644
--- a/lisp/gnus/rfc2047.el
+++ b/lisp/gnus/rfc2047.el
@@ -1,5 +1,5 @@
;;; rfc2047.el --- functions for encoding and decoding rfc2047 messages
-;; Copyright (C) 1998, 1999, 2000, 2002, 2003 Free Software Foundation, Inc.
+;; Copyright (C) 1998,1999,2000,02,03,2004 Free Software Foundation, Inc.
;; Author: Lars Magne Ingebrigtsen <larsi@gnus.org>
;; MORIOKA Tomohiko <morioka@jaist.ac.jp>
@@ -169,7 +169,7 @@ Should be called narrowed to the head of the message."
((eq method 'address-mime)
(rfc2047-encode-region (point) (point-max)))
((eq method 'mime)
- (let (rfc2047-encoding-type)
+ (let ((rfc2047-encoding-type method))
(rfc2047-encode-region (point) (point-max))))
((eq method 'default)
(if (and (featurep 'mule)