From: ueno <ueno>
Date: Fri, 4 Aug 2000 06:23:41 +0000 (+0000)
Subject: Synch up with emy-1_13.
X-Git-Url: http://git.chise.org/gitweb/?a=commitdiff_plain;h=04ba6eda9f256106a9cdf215998b71b51a2023b1;p=elisp%2Fsemi.git

Synch up with emy-1_13.
---

diff --git a/mime-image.el b/mime-image.el
index 48e1230..76c2335 100644
--- a/mime-image.el
+++ b/mime-image.el
@@ -96,7 +96,10 @@
 	    glyph)))
 
       (defun mime-image-insert (image &optional string area)
-	(let ((extent (make-extent (point) (progn (insert string)(point)))))
+	(let ((extent (make-extent (point)
+				   (progn (and string
+					       (insert string))
+					  (point)))))
 	  (set-extent-property extent 'invisible t)
 	  (set-extent-end-glyph extent image))))
   (condition-case nil