Commit c8f98e6d authored by Richard M. Stallman's avatar Richard M. Stallman
Browse files

(describe-variable): Don't call substitute-command-keys.

parent 4d4c1514
...@@ -627,9 +627,7 @@ Returns the documentation as a string, also." ...@@ -627,9 +627,7 @@ Returns the documentation as a string, also."
(princ "Documentation:") (princ "Documentation:")
(terpri) (terpri)
(let ((doc (documentation-property variable 'variable-documentation))) (let ((doc (documentation-property variable 'variable-documentation)))
(if doc (princ (or doc "not documented as a variable.")))
(princ (substitute-command-keys doc))
(princ "not documented as a variable.")))
(print-help-return-message) (print-help-return-message)
(save-excursion (save-excursion
(set-buffer standard-output) (set-buffer standard-output)
......
Markdown is supported
0% or .
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment