From: 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/gitweb/?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) ))