From: ueno <ueno>
Date: Sat, 23 Feb 2002 05:47:47 +0000 (+0000)
Subject: * mime-image.el (mime-image-create) [XEmacs]: Ignore errors about
X-Git-Tag: emiko-1_14-epg-branchpoint~58
X-Git-Url: http://git.chise.org/gitweb/?a=commitdiff_plain;h=a1fa52cf8607b8b7c77127e6f079c3d7e716da43;p=elisp%2Fsemi.git

* mime-image.el (mime-image-create) [XEmacs]: Ignore errors about
to obtain the instance of glyph's image.
[cf. <emacs-mime-ja:989>]
---

diff --git a/mime-image.el b/mime-image.el
index 39806f9..1a584f8 100644
--- a/mime-image.el
+++ b/mime-image.el
@@ -92,7 +92,8 @@
 		     (list type (if data-p :data :file) file-or-data)
 		     props)
 		  file-or-data))))
-	  (if (nothing-image-instance-p (glyph-image-instance glyph)) nil
+	  (if (nothing-image-instance-p (ignore-errors
+					  (glyph-image-instance glyph))) nil
 	    glyph)))
 
       (defun mime-image-insert (image &optional string area)