(mime-preview-find-boundary-info): Use <last point> - 1 instead of

<last point> to get `mime-view-entity' property.

diff --git a/mime-view.el b/mime-view.el
index 10bf943..5ea7d34 100644 (file)
--- a/mime-view.el
+++ b/mime-view.el
@@ -1403,7 +1403,7 @@ button-2  Move to point under the mouse cursor
                               (point) 'mime-view-entity))
                   (goto-char e)
                   (let ((rc (mime-entity-node-id
-                             (get-text-property (point)
+                             (get-text-property (1- (point))
                                                 'mime-view-entity))))
                     (or (equal entity-node-id
                                (nthcdr (- (length rc) len) rc))