From: yamaoka <yamaoka>
Date: Tue, 17 Aug 1999 02:27:07 +0000 (+0000)
Subject: (mime-preview-original-major-mode): Don't use `get-text-property' at the end
X-Git-Tag: remi-1_13_2~5
X-Git-Url: http://git.chise.org/gitweb/?a=commitdiff_plain;h=2d7d9b09ad86983344dc13a0c7273888fa29a19c;p=elisp%2Fsemi.git

(mime-preview-original-major-mode): Don't use `get-text-property' at the end
of the buffer.
---

diff --git a/mime-view.el b/mime-view.el
index cb3a937..168a73d 100644
--- a/mime-view.el
+++ b/mime-view.el
@@ -131,7 +131,10 @@ mother-buffer."
 	(mime-preview-original-major-mode recursive)
 	)
     (cdr (assq 'major-mode
-	       (get-text-property (or point (point)) 'mime-view-situation)))))
+	       (get-text-property (or point (if (eobp)
+						(1- (point-max))
+					      (point)))
+				  'mime-view-situation)))))
 
 
 ;;; @ entity information