(apropos-zippy): Call print-help-return-message, similar to other Help

and Apropos commands.

diff --git a/lisp/ChangeLog b/lisp/ChangeLog
index 687b89d3906c75adb71211133d4c935c5cafe124..e640bb95710695cfe5aa0974059fb37a8b5e9996 100644 (file)
--- a/lisp/ChangeLog
+++ b/lisp/ChangeLog
@@ -1,8 +1,12 @@
 2005-12-03  Eli Zaretskii  <eliz@gnu.org>
 
+       * play/yow.el (apropos-zippy): Call print-help-return-message,
+       similar to other Help and Apropos commands.
+
        * help.el (print-help-return-message): If pop-up-frames is
        non-nil, set up help-return-method to delete the help window and,
-       possibly, its frame as well.  Doc fix.
+       possibly, its frame as well, and don't display message about
+       scrolling the help window.  Doc fix.
        (help-return-method): Doc fix.
 
 2005-12-03  Martin Rudalics  <rudalics@gmx.at>  (tiny change)

diff --git a/lisp/play/yow.el b/lisp/play/yow.el
index 2809e3ec620359d256a98c1d7b9091101c7dbd5a..74a30d6ac9d3035305f07a82bb09f19a2c37080c 100644 (file)
--- a/lisp/play/yow.el
+++ b/lisp/play/yow.el
@@ -102,7 +102,8 @@ If called interactively, display a list of matches."
                     (while l
                       (princ (car l))
                       (setq l (cdr l))
-                      (and l (princ "\n\n"))))))))
+                      (and l (princ "\n\n")))
+                   (print-help-return-message))))))
     matches))
 
 \f