summaryrefslogtreecommitdiff
path: root/lisp/help-fns.el
diff options
context:
space:
mode:
authorNoam Postavsky <npostavs@gmail.com>2017-07-01 20:54:41 -0400
committerNoam Postavsky <npostavs@gmail.com>2017-07-02 11:57:34 -0400
commit9a65b5779629d4f0f88d568ff164629e82db5ba8 (patch)
tree3310b99a0e3d9c961b6ecfda3380e6bb3ee50124 /lisp/help-fns.el
parent34d4720f833bb382b28d9faecf82d34db1eb4494 (diff)
downloademacs-9a65b5779629d4f0f88d568ff164629e82db5ba8.tar.gz
emacs-9a65b5779629d4f0f88d568ff164629e82db5ba8.tar.bz2
emacs-9a65b5779629d4f0f88d568ff164629e82db5ba8.zip
* lisp/emacs-lisp/cl-print.el (cl-print-compiled-button): t by default.
* lisp/emacs-lisp/debug.el (debugger-insert-backtrace): * lisp/help-fns.el (describe-variable): No need to let-bind `cl-print-compiled-button' to t anymore.
Diffstat (limited to 'lisp/help-fns.el')
-rw-r--r--lisp/help-fns.el5
1 files changed, 1 insertions, 4 deletions
diff --git a/lisp/help-fns.el b/lisp/help-fns.el
index d7c31f9e2b8..32324ae3bcb 100644
--- a/lisp/help-fns.el
+++ b/lisp/help-fns.el
@@ -776,8 +776,6 @@ If ANY-SYMBOL is non-nil, don't insist the symbol be bound."
version package))))))
output))
-(defvar cl-print-compiled-button)
-
;;;###autoload
(defun describe-variable (variable &optional buffer frame)
"Display the full documentation of VARIABLE (a symbol).
@@ -858,8 +856,7 @@ it is displayed along with the global value."
(print-rep
(let ((rep
(let ((print-quoted t)
- (print-circle t)
- (cl-print-compiled-button t))
+ (print-circle t))
(cl-prin1-to-string val))))
(if (and (symbolp val) (not (booleanp val)))
(format-message "`%s'" rep)