Import Gnus v5.10.2.

[elisp/gnus.git-] / lisp / pgg.el

diff --git a/lisp/pgg.el b/lisp/pgg.el
index 82a3805..b51bf2c 100644 (file)
--- a/lisp/pgg.el
+++ b/lisp/pgg.el
@@ -78,7 +78,8 @@
        ,@body)))
 
 (defun pgg-temp-buffer-show-function (buffer)
-  (let ((window (split-window-vertically)))
+  (let ((window (or (get-buffer-window buffer 'visible)
+                   (split-window-vertically))))
     (set-window-buffer window buffer)
     (shrink-window-if-larger-than-buffer window)))