changeset 55411:d0e0914b0f6d

(rfc2047-encode-message-header): Don't encode non-address headers as address headers (which breaks if subject has a single ").
author Stefan Monnier <monnier@iro.umontreal.ca>
date Fri, 07 May 2004 16:10:25 +0000
parents 540fec0aa83c
children 53a1a79a33f9
files lisp/gnus/ChangeLog lisp/gnus/rfc2047.el
diffstat 2 files changed, 7 insertions(+), 2 deletions(-) [+]
line wrap: on
line diff
--- a/lisp/gnus/ChangeLog	Fri May 07 16:09:06 2004 +0000
+++ b/lisp/gnus/ChangeLog	Fri May 07 16:10:25 2004 +0000
@@ -1,3 +1,8 @@
+2004-05-07  Stefan Monnier  <monnier@iro.umontreal.ca>
+
+	* rfc2047.el (rfc2047-encode-message-header): Don't encode non-address
+	headers as address headers (which breaks if subject has a single ").
+
 2004-05-06  Stefan Monnier  <monnier@iro.umontreal.ca>
 
 	* nnimap.el (nnimap-demule): Avoid string-as-multibyte.
--- a/lisp/gnus/rfc2047.el	Fri May 07 16:09:06 2004 +0000
+++ b/lisp/gnus/rfc2047.el	Fri May 07 16:10:25 2004 +0000
@@ -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 @@
 	     ((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)