diff options
author | Eli Zaretskii <eliz@gnu.org> | 2017-09-29 10:02:33 +0300 |
---|---|---|
committer | Eli Zaretskii <eliz@gnu.org> | 2017-09-29 10:02:33 +0300 |
commit | c1ac8c170f17a98b7e5d6e098f707daeb71ea27d (patch) | |
tree | dffdc5f4a509ec200b69c09f52b979f42d31e10b /lisp/emacs-lisp/ert.el | |
parent | 18073beb14f393b4bbcc92890a89dcfcb75fb7ac (diff) | |
parent | af130f900fc499f71ea22f10ba055a75ce35ed4e (diff) | |
download | emacs-c1ac8c170f17a98b7e5d6e098f707daeb71ea27d.tar.gz emacs-c1ac8c170f17a98b7e5d6e098f707daeb71ea27d.tar.bz2 emacs-c1ac8c170f17a98b7e5d6e098f707daeb71ea27d.zip |
Merge branch 'emacs-26' of git.savannah.gnu.org:/srv/git/emacs into emacs-26
Diffstat (limited to 'lisp/emacs-lisp/ert.el')
-rw-r--r-- | lisp/emacs-lisp/ert.el | 5 |
1 files changed, 2 insertions, 3 deletions
diff --git a/lisp/emacs-lisp/ert.el b/lisp/emacs-lisp/ert.el index d4276221ba5..83acbacb883 100644 --- a/lisp/emacs-lisp/ert.el +++ b/lisp/emacs-lisp/ert.el @@ -742,9 +742,8 @@ run. ARGS are the arguments to `debugger'." ;; backtrace ready for printing is important for batch ;; use. ;; - ;; Grab the frames starting from `signal', frames below - ;; that are all from the debugger. - (backtrace (backtrace-frames 'signal)) + ;; Grab the frames above the debugger. + (backtrace (cdr (backtrace-frames debugger))) (infos (reverse ert--infos))) (setf (ert--test-execution-info-result info) (cl-ecase type |