diff options
| author | Richard M. Stallman <rms@gnu.org> | 2005-07-10 17:23:54 +0000 |
|---|---|---|
| committer | Richard M. Stallman <rms@gnu.org> | 2005-07-10 17:23:54 +0000 |
| commit | e2dacaacaf8ffa10e3572db573c47b69ae3b51a8 (patch) | |
| tree | 6f55368f9694b8ad24edf8ab8bc09ad4f0062019 /lisp/emacs-lisp/edebug.el | |
| parent | 5bcc074b491800c5787ae61c7437a2e1cbd6657c (diff) | |
| download | emacs-e2dacaacaf8ffa10e3572db573c47b69ae3b51a8.tar.gz | |
(edebug-enter): Call with-timeout-suspend and with-timeout-unsuspend.
Diffstat (limited to 'lisp/emacs-lisp/edebug.el')
| -rw-r--r-- | lisp/emacs-lisp/edebug.el | 2 |
1 files changed, 2 insertions, 0 deletions
diff --git a/lisp/emacs-lisp/edebug.el b/lisp/emacs-lisp/edebug.el index fe0453519df..72046399352 100644 --- a/lisp/emacs-lisp/edebug.el +++ b/lisp/emacs-lisp/edebug.el @@ -2244,6 +2244,7 @@ error is signaled again." (max-specpdl-size (+ 200 max-specpdl-size)) (debugger edebug-debugger) ; only while edebug is active. + (edebug-with-timeout-suspend (with-timeout-suspend)) (edebug-outside-debug-on-error debug-on-error) (edebug-outside-debug-on-quit debug-on-quit) ;; Binding these may not be the right thing to do. @@ -2289,6 +2290,7 @@ error is signaled again." (edebug-enter edebug-function edebug-args edebug-body)) ;; Reset global variables in case outside value was changed. (setq executing-kbd-macro edebug-outside-executing-macro) + (with-timeout-unsuspend edebug-with-timeout-suspend) (edebug-restore-status 'post-command-hook edebug-outside-post-command-hook) (edebug-restore-status |