diff options
| author | Richard M. Stallman | 1995-10-30 21:18:39 +0000 |
|---|---|---|
| committer | Richard M. Stallman | 1995-10-30 21:18:39 +0000 |
| commit | c8f98e6dac31f153d5ce9e394fcb1521bc51aa9a (patch) | |
| tree | 076ad4b655cf74847e6f7752cd45c96bce13703d | |
| parent | 4d4c1514ed9d7ae91d76615fe0dbb2da574638ff (diff) | |
| download | emacs-c8f98e6dac31f153d5ce9e394fcb1521bc51aa9a.tar.gz emacs-c8f98e6dac31f153d5ce9e394fcb1521bc51aa9a.zip | |
(describe-variable): Don't call substitute-command-keys.
| -rw-r--r-- | lisp/help.el | 4 |
1 files changed, 1 insertions, 3 deletions
diff --git a/lisp/help.el b/lisp/help.el index e416fd3d887..68c18ecd48a 100644 --- a/lisp/help.el +++ b/lisp/help.el | |||
| @@ -627,9 +627,7 @@ Returns the documentation as a string, also." | |||
| 627 | (princ "Documentation:") | 627 | (princ "Documentation:") |
| 628 | (terpri) | 628 | (terpri) |
| 629 | (let ((doc (documentation-property variable 'variable-documentation))) | 629 | (let ((doc (documentation-property variable 'variable-documentation))) |
| 630 | (if doc | 630 | (princ (or doc "not documented as a variable."))) |
| 631 | (princ (substitute-command-keys doc)) | ||
| 632 | (princ "not documented as a variable."))) | ||
| 633 | (print-help-return-message) | 631 | (print-help-return-message) |
| 634 | (save-excursion | 632 | (save-excursion |
| 635 | (set-buffer standard-output) | 633 | (set-buffer standard-output) |