diff lisp/gnus/mml.el @ 100516:0363096dbcf8

Merge from gnus--devo--0 Revision: emacs@sv.gnu.org/emacs--devo--0--patch-1505
author Miles Bader <miles@gnu.org>
date Fri, 19 Dec 2008 02:40:25 +0000
parents b8d5bfa98123
children a9dc0e7c3f2b
line wrap: on
line diff
--- a/lisp/gnus/mml.el	Fri Dec 19 01:50:43 2008 +0000
+++ b/lisp/gnus/mml.el	Fri Dec 19 02:40:25 2008 +0000
@@ -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 (mm-substring-no-properties file)
 			  'disposition (or disposition "attachment")
 			  'description description)))