Changes committed gnus/lisp (ChangeLog mml.el)

Modified: ChangeLog mml.el

(mml-attach-file): Strip text properties from file name.


Index: ChangeLog
diff -u gnus/lisp/ChangeLog:7.1944 gnus/lisp/ChangeLog:7.1945
--- ChangeLog:7.1944	Tue Dec 16 00:35:32 2008
+++ ChangeLog	Thu Dec 18 22:08:33 2008
@@ -1,3 +1,7 @@
+2008-12-18  Reiner Steib  <[email protected]>
+
+	* mml.el (mml-attach-file): Strip text properties from file name.
+
 2008-12-15  Katsumi Yamaoka  <[email protected]>
 
 	* mml.el (mml-generate-mime-1): Prefer the MIME charset that Emacs
Index: mml.el
diff -u gnus/lisp/mml.el:7.71 gnus/lisp/mml.el:7.72
--- mml.el:7.71	Tue Dec 16 00:35:32 2008
+++ mml.el	Thu Dec 18 22:08:33 2008
@@ -1289,7 +1289,9 @@
     (unless (message-in-body-p) (goto-char (point-max)))
     (mml-insert-empty-tag 'part
 			  'type type
-			  'filename file
+			  ;; icicles redefines read-file-name and returns a
+			  ;; string w/ text properties :-/
+			  'filename (substring-no-properties file)
 			  'disposition (or disposition "attachment")
 			  'description description)))