mirrors/emacs
1
Fork 0
mirror of git://git.sv.gnu.org/emacs.git synced 2026-01-06 11:50:51 -08:00
Code Issues Projects Releases Wiki Activity

Spelling fixes.

Browse source
This commit is contained in:
Paul Eggert 2011-12-18 22:21:24 -08:00
parent 3771cb1735
commit 99d990817c
31 changed files with 40 additions and 41 deletions
Download patch file Download diff file Expand all files Collapse all files

4
lisp/cedet/data-debug.el
View file

@ -1060,11 +1060,11 @@ If the result is a list or vector, then use the data debugger to display it."
(setq values (cons (eval expr) values))
(let ((old-value (make-symbol "t")) new-value)
;; Bind debug-on-error to something unique so that we can
;; detect when evaled code changes it.
;; detect when evalled code changes it.
(let ((debug-on-error old-value))
(setq values (cons (eval expr) values))
(setq new-value debug-on-error))
;; If evaled code has changed the value of debug-on-error,
;; If evalled code has changed the value of debug-on-error,
;; propagate that change to the global binding.
(unless (eq old-value new-value)
(setq debug-on-error new-value))))