diff options
| author | Karl Heuer <kwzh@gnu.org> | 1994-11-09 05:47:20 +0000 |
|---|---|---|
| committer | Karl Heuer <kwzh@gnu.org> | 1994-11-09 05:47:20 +0000 |
| commit | ca6e7b1358dd54dbc6ba0c349341482054b93a14 (patch) | |
| tree | b46fbb283ab4865f1a69aebe84dbc3b2b584e0f7 | |
| parent | 2ca4fe5dc19e488021351b1907edfcdf356f1f01 (diff) | |
| download | emacs-ca6e7b1358dd54dbc6ba0c349341482054b93a14.tar.gz | |
(set-variable): Set help-mode in *Help* buffer.
| -rw-r--r-- | lisp/simple.el | 3 |
1 files changed, 3 insertions, 0 deletions
diff --git a/lisp/simple.el b/lisp/simple.el index 2f0fbc61b4a..197e4e3df44 100644 --- a/lisp/simple.el +++ b/lisp/simple.el @@ -2511,6 +2511,9 @@ it were the arg to `interactive' (which see) to interactively read the value." (let ((print-length 20)) (princ "\n\nCurrent value: ") (prin1 (symbol-value var)))) + (save-excursion + (set-buffer standard-output) + (help-mode)) nil))))) (list var (let ((prop (get var 'variable-interactive))) |