diff options
Diffstat (limited to 'lisp/emacs-lisp/edebug.el')
| -rw-r--r-- | lisp/emacs-lisp/edebug.el | 5 |
1 files changed, 3 insertions, 2 deletions
diff --git a/lisp/emacs-lisp/edebug.el b/lisp/emacs-lisp/edebug.el index 49cf4115923..444c310920d 100644 --- a/lisp/emacs-lisp/edebug.el +++ b/lisp/emacs-lisp/edebug.el @@ -2660,13 +2660,14 @@ MSG is printed after `::::} '." ;; Display result of previous evaluation. (if (and edebug-break (not (eq edebug-execution-mode 'Continue-fast))) - (sit-for 1)) ; Show break message. + (edebug-sit-for edebug-sit-for-seconds)) ; Show message. (edebug-previous-result))) (cond (edebug-break (cond - ((eq edebug-execution-mode 'continue) (edebug-sit-for 1)) + ((eq edebug-execution-mode 'continue) + (edebug-sit-for edebug-sit-for-seconds)) ((eq edebug-execution-mode 'Continue-fast) (edebug-sit-for 0)) (t (setq edebug-stop t)))) ;; not edebug-break |