From: yamaoka <yamaoka>
Date: Fri, 30 Jul 1999 02:15:33 +0000 (+0000)
Subject: (mime-view-application/pgp): Don't set the values of `mime-raw-buffer' and
X-Git-Tag: semi-pgpgpg_20~29
X-Git-Url: http://git.chise.org/cgi-bin/gitweb.cgi?a=commitdiff_plain;h=356e83e9d0884a674fffe4cbc4de308808b5860b;p=elisp%2Fsemi.git

(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
--- 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)
     ))