(mime-view-application/pgp): Don't set the values of `mime-raw-buffer' and

`mime-mother-buffer' in the preview buffer.

diff --git a/mime-pgp.el b/mime-pgp.el
index b2cebc7..7a4a36c 100644 (file)
--- a/mime-pgp.el
+++ b/mime-pgp.el
@@ -92,8 +92,7 @@
           (delete-region
            (point-min)
            (and
-            (re-search-forward "^-+BEGIN PGP SIGNED MESSAGE-+\n")
-            (search-forward "\n\n")
+            (re-search-forward "^-+BEGIN PGP SIGNED MESSAGE-+\n\n")
             (match-end 0)))
           (delete-region
            (and (re-search-forward "^-+BEGIN PGP SIGNATURE-+")
@@ -120,9 +119,6 @@
     (setq major-mode 'mime-show-message-mode)
     (save-window-excursion (mime-view-buffer nil preview-buffer mother
                                             nil representation-type))
-    (with-current-buffer preview-buffer
-      (setq mime-raw-buffer (get-buffer new-name)
-           mime-mother-buffer mother))
     (set-window-buffer p-win preview-buffer)
     ))