* lisp/emacs-lisp/edebug.el (edebug-debugger): Use edebug-eval to run the

break-condition in the context of the debugged code.

Fixes: debbugs:12685
This commit is contained in:
Stefan Monnier 2013-08-08 19:14:20 -04:00
parent 74c5d24c74
commit 0ca3f70e4f
2 changed files with 11 additions and 8 deletions

View file

@ -2314,8 +2314,7 @@ MSG is printed after `::::} '."
(if edebug-global-break-condition
(condition-case nil
(setq edebug-global-break-result
;; FIXME: lexbind.
(eval edebug-global-break-condition))
(edebug-eval edebug-global-break-condition))
(error nil))))
(edebug-break))
@ -2326,8 +2325,7 @@ MSG is printed after `::::} '."
(and edebug-break-data
(or (not edebug-break-condition)
(setq edebug-break-result
;; FIXME: lexbind.
(eval edebug-break-condition))))))
(edebug-eval edebug-break-condition))))))
(if (and edebug-break
(nth 2 edebug-break-data)) ; is it temporary?
;; Delete the breakpoint.