From: tomo <tomo>
Date: Thu, 28 Dec 2000 05:21:46 +0000 (+0000)
Subject: (mime-view-read-situation-examples-file): Display warning.
X-Git-Tag: semi-1_14_3~4
X-Git-Url: http://git.chise.org/gitweb/?a=commitdiff_plain;h=2e003aa8a9dc040b4992d5acf19952bd3339b655;p=elisp%2Fsemi.git

(mime-view-read-situation-examples-file): Display warning.
[cf. <emacs-mime-ja:680>]
---

diff --git a/mime-view.el b/mime-view.el
index 26593bb..a5f2ba6 100644
--- a/mime-view.el
+++ b/mime-view.el
@@ -385,9 +385,9 @@ mother-buffer."
               ;;   (symbol-value 'file-coding-system))
               ;;  (t nil))
 	      )
-	(condition-case nil
+	(condition-case error
 	    (eval-buffer)
-	  (error nil))
+	  (error (message "%s is broken: %s" file (cdr error))))
 	;; format check
 	(condition-case nil
 	    (let ((i 0))