# HG changeset patch
# User Martin Rudalics <rudalics@gmx.at>
# Date 1183883252 0
# Node ID 0e1206aba797f51ba69b204810a17c150cdf3f4e
# Parent  787c85f7fe0504965a25064a14f43a95af84bad1
(disabled-command-function): Fit window to buffer to
make last line visible.

diff -r 787c85f7fe05 -r 0e1206aba797 lisp/novice.el
--- a/lisp/novice.el	Sun Jul 08 08:21:13 2007 +0000
+++ b/lisp/novice.el	Sun Jul 08 08:27:32 2007 +0000
@@ -88,8 +88,9 @@
 SPC to try the command just this once, but leave it disabled.
 !   to try it, and enable all disabled commands for this session only.")
        (save-excursion
-	(set-buffer standard-output)
-	(help-mode)))
+	 (set-buffer standard-output)
+	 (help-mode)))
+     (fit-window-to-buffer (get-buffer-window "*Disabled Command*"))
      (message "Type y, n, ! or SPC (the space bar): ")
      (let ((cursor-in-echo-area t))
        (while (progn (setq char (read-event))