# HG changeset patch # User Karl Heuer # Date 784360130 0 # Node ID 430b8cf0951557a22c016fb081068762c58223bf # Parent 1365bc291f4c93492693814ce8c30bd9f6cc3022 (disabled-command-hook): Set help-mode in *Help* buffer. diff -r 1365bc291f4c -r 430b8cf09515 lisp/novice.el --- a/lisp/novice.el Wed Nov 09 05:48:21 1994 +0000 +++ b/lisp/novice.el Wed Nov 09 05:48:50 1994 +0000 @@ -71,7 +71,10 @@ Space to try the command just this once, but leave it disabled, Y to try it and enable it (no questions if you use it again), -N to do nothing (command remains disabled).")) +N to do nothing (command remains disabled).") + (save-excursion + (set-buffer standard-output) + (help-mode))) (message "Type y, n or Space: ") (let ((cursor-in-echo-area t)) (while (not (memq (setq char (downcase (read-char)))