diff options
| -rw-r--r-- | lisp/novice.el | 5 |
1 files changed, 4 insertions, 1 deletions
diff --git a/lisp/novice.el b/lisp/novice.el index 1e611ce0490..ad9fc94655c 100644 --- a/lisp/novice.el +++ b/lisp/novice.el | |||
| @@ -71,7 +71,10 @@ | |||
| 71 | Space to try the command just this once, | 71 | Space to try the command just this once, |
| 72 | but leave it disabled, | 72 | but leave it disabled, |
| 73 | Y to try it and enable it (no questions if you use it again), | 73 | Y to try it and enable it (no questions if you use it again), |
| 74 | N to do nothing (command remains disabled).")) | 74 | N to do nothing (command remains disabled).") |
| 75 | (save-excursion | ||
| 76 | (set-buffer standard-output) | ||
| 77 | (help-mode))) | ||
| 75 | (message "Type y, n or Space: ") | 78 | (message "Type y, n or Space: ") |
| 76 | (let ((cursor-in-echo-area t)) | 79 | (let ((cursor-in-echo-area t)) |
| 77 | (while (not (memq (setq char (downcase (read-char))) | 80 | (while (not (memq (setq char (downcase (read-char))) |