# HG changeset patch
# User Karl Heuer <kwzh@gnu.org>
# Date 906587510 0
# Node ID 61483b4c169c8d1abc7358be05cc16ab7e210808
# Parent  3a7a029df5936f19135077786a31a5f2058a5d48
(mh-mhn-compose-insertion): Use quotes.

diff -r 3a7a029df593 -r 61483b4c169c lisp/mail/mh-mime.el
--- a/lisp/mail/mh-mime.el	Tue Sep 22 10:33:09 1998 +0000
+++ b/lisp/mail/mh-mime.el	Wed Sep 23 21:51:50 1998 +0000
@@ -28,7 +28,7 @@
 
 ;;; Change Log:
 
-;; $Id: mh-mime.el,v 1.6 1996/01/14 07:34:30 erik Exp rms $
+;; $Id: mh-mime.el,v 1.7 1997/01/13 03:25:05 rms Exp kwzh $
 
 ;;; Code:
 
@@ -79,8 +79,9 @@
 				 mh-mime-content-types nil nil nil)
 		  (read-string "Content-description: ")
 		  (read-string "Content-Attributes: " 
-			       (concat "name=" 
-				       (file-name-nondirectory filename))))))
+			       (concat "name=\""
+				       (file-name-nondirectory filename)
+				       "\"")))))
   (mh-mhn-compose-type filename type description attributes ))
 
 (defun mh-mhn-compose-type (filename type