From 9a65b5779629d4f0f88d568ff164629e82db5ba8 Mon Sep 17 00:00:00 2001 From: Noam Postavsky Date: Sat, 1 Jul 2017 20:54:41 -0400 Subject: * 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. --- lisp/emacs-lisp/debug.el | 3 --- 1 file changed, 3 deletions(-) (limited to 'lisp/emacs-lisp/debug.el') diff --git a/lisp/emacs-lisp/debug.el b/lisp/emacs-lisp/debug.el index b836e823c73..2b8782590c4 100644 --- a/lisp/emacs-lisp/debug.el +++ b/lisp/emacs-lisp/debug.el @@ -271,13 +271,10 @@ first will be printed into the backtrace buffer." debugger-value))) -(defvar cl-print-compiled-button) - (defun debugger-insert-backtrace (frames do-xrefs) "Format and insert the backtrace FRAMES at point. Make functions into cross-reference buttons if DO-XREFS is non-nil." (let ((standard-output (current-buffer)) - (cl-print-compiled-button t) (eval-buffers eval-buffer-list)) (require 'help-mode) ; Define `help-function-def' button type. (pcase-dolist (`(,evald ,fun ,args ,flags) frames) -- cgit v1.2.3