summaryrefslogtreecommitdiff
path: root/lisp/help-fns.el
diff options
context:
space:
mode:
authorGlenn Morris <rgm@gnu.org>2007-09-06 05:53:42 +0000
committerGlenn Morris <rgm@gnu.org>2007-09-06 05:53:42 +0000
commitfccd9537b1a9ee423d253a46fa7f0c3f6cbf9684 (patch)
treee2dfb5a93205694f2dd4291a247068e6844900b3 /lisp/help-fns.el
parent27ba1132c92f6cf3a11c5c27ff5d01ccf1fe6dda (diff)
downloademacs-fccd9537b1a9ee423d253a46fa7f0c3f6cbf9684.tar.gz
Johan Bockg� <bojohan at dd.chalmers.se>
(describe-variable): Keep doc's text properties.
Diffstat (limited to 'lisp/help-fns.el')
-rw-r--r--lisp/help-fns.el3
1 files changed, 2 insertions, 1 deletions
diff --git a/lisp/help-fns.el b/lisp/help-fns.el
index 1de255d1e63..cb99d188ffa 100644
--- a/lisp/help-fns.el
+++ b/lisp/help-fns.el
@@ -625,7 +625,8 @@ it is displayed along with the global value."
"which is byte-compiled expression.\n"
(format "`%s'.\n" safe-var))))
(princ "\nDocumentation:\n")
- (princ (or doc "Not documented as a variable.")))
+ (with-current-buffer standard-output
+ (insert (or doc "Not documented as a variable."))))
;; Make a link to customize if this variable can be customized.
(if (custom-variable-p variable)
(let ((customize-label "customize"))