`pgg-errors-buffer' to `pgg-output-buffer'.
+2000-02-02 Nakagawa, Makoto <Makoto.Nakagawa@jp.compaq.com>
+
+ * pgg-pgp5.el (pgg-scheme-verify-region): Copy the contents of
+ `pgg-errors-buffer' to `pgg-output-buffer'.
+
2000-02-21 Daiki Ueno <ueno@ueda.info.waseda.ac.jp>
* mime-pgp.el: When it is compiled, define `smime-output-buffer'
(if signature (delete-file signature))
(with-current-buffer pgg-errors-buffer
(goto-char (point-min))
- (re-search-forward "^Good signature" nil t))))
+ (if (re-search-forward "^Good signature" nil t)
+ (progn
+ (set-buffer pgg-output-buffer)
+ (insert-buffer-substring pgg-errors-buffer)
+ t)
+ nil))))
(luna-define-method pgg-scheme-insert-key ((scheme pgg-scheme-pgp5))
(let* ((pgg-pgp5-user-id (or pgg-pgp5-user-id pgg-default-user-id))