summaryrefslogtreecommitdiff
path: root/lisp/emacs-lisp/backtrace.el
diff options
context:
space:
mode:
Diffstat (limited to 'lisp/emacs-lisp/backtrace.el')
-rw-r--r--lisp/emacs-lisp/backtrace.el4
1 files changed, 2 insertions, 2 deletions
diff --git a/lisp/emacs-lisp/backtrace.el b/lisp/emacs-lisp/backtrace.el
index 03bef072709..b395a13b0dd 100644
--- a/lisp/emacs-lisp/backtrace.el
+++ b/lisp/emacs-lisp/backtrace.el
@@ -33,7 +33,6 @@
(eval-when-compile (require 'cl-lib))
(eval-when-compile (require 'pcase))
-(eval-when-compile (require 'subr-x)) ; if-let
(require 'find-func)
(require 'help-mode) ; Define `help-function-def' button type.
(require 'lisp-mode)
@@ -202,6 +201,7 @@ frames where the source code location is known.")
"+" #'backtrace-multi-line
"-" #'backtrace-single-line
"." #'backtrace-expand-ellipses
+ "C-]" #'abort-recursive-edit
"<follow-link>" 'mouse-face
"<mouse-2>" #'mouse-select-window
@@ -750,7 +750,7 @@ Format it according to VIEW."
(let ((fun-and-args (cons fun args)))
(insert (backtrace--print-to-string fun-and-args)))
;; Skip the open-paren.
- (cl-incf fun-beg)))
+ (incf fun-beg)))
(when fun-file
(make-text-button fun-beg
(or fun-end