mml2015: make key image extraction robuster

[gnus] / lisp / mml2015.el

diff --git a/lisp/mml2015.el b/lisp/mml2015.el
index 389b522..2c2187a 100644 (file)
--- a/lisp/mml2015.el
+++ b/lisp/mml2015.el
@@ -877,7 +877,9 @@ If set, it overrides the setting of `mml2015-sign-with-sender'."
                           (shell-quote-argument epg-gpg-program) key-id))))
       (when (> (length data) 0)
         (insert (substring data 16))
-        (create-image (buffer-string) nil t)))))
+       (condition-case nil
+           (gnus-create-image (buffer-string) nil t)
+         (error))))))
 
 (autoload 'gnus-rescale-image "gnus-util")