diff options
| author | Juri Linkov | 2025-11-05 09:14:43 +0200 |
|---|---|---|
| committer | Juri Linkov | 2025-11-05 09:15:05 +0200 |
| commit | 2f6e5d2eda006cfa65a6f4e2aa0d63e20a47c0ec (patch) | |
| tree | 3298c3d5dc00a7464630e1da8668949899b75525 /test | |
| parent | e54fd7c012c9fb3bbccf64a128fb81a411c4310f (diff) | |
| download | emacs-2f6e5d2eda006cfa65a6f4e2aa0d63e20a47c0ec.tar.gz emacs-2f6e5d2eda006cfa65a6f4e2aa0d63e20a47c0ec.zip | |
* test/lisp/emacs-lisp/map-ynp-tests.el: Use 'eval-expression-debug-on-error'.
(test-map-ynp-kmacro): Bind 'eval-expression-debug-on-error' to nil
instead of silencing 'backtrace-print'.
Diffstat (limited to 'test')
| -rw-r--r-- | test/lisp/emacs-lisp/map-ynp-tests.el | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/test/lisp/emacs-lisp/map-ynp-tests.el b/test/lisp/emacs-lisp/map-ynp-tests.el index 6a9c8213791..4e88e5865fe 100644 --- a/test/lisp/emacs-lisp/map-ynp-tests.el +++ b/test/lisp/emacs-lisp/map-ynp-tests.el | |||
| @@ -33,7 +33,7 @@ | |||
| 33 | 33 | ||
| 34 | (ert-deftest test-map-ynp-kmacro () | 34 | (ert-deftest test-map-ynp-kmacro () |
| 35 | "Test that `map-y-or-n-p' in a kmacro terminates on end of input." | 35 | "Test that `map-y-or-n-p' in a kmacro terminates on end of input." |
| 36 | (cl-letf* (((symbol-function #'backtrace-print) (lambda ()))) ;; bug#67836 | 36 | (let ((eval-expression-debug-on-error nil)) ;; bug#67836 |
| 37 | (execute-kbd-macro (read-kbd-macro "M-: (map-ynp-tests-simple-call) RET y")) | 37 | (execute-kbd-macro (read-kbd-macro "M-: (map-ynp-tests-simple-call) RET y")) |
| 38 | (should-error | 38 | (should-error |
| 39 | (execute-kbd-macro (read-kbd-macro "M-: (map-ynp-tests-simple-call) RET"))) | 39 | (execute-kbd-macro (read-kbd-macro "M-: (map-ynp-tests-simple-call) RET"))) |