procyberian/emacs
2
0
Fork 0
Code Issues Pull requests Projects Releases Packages Wiki Activity Actions

(debugger-setup-buffer): When eval-buffer

Browse source 
was called with nil for the buffer, handle the read position right.
Handle read position for eval-region, too.
This commit is contained in:
Richard M. Stallman 2005-07-09 04:14:26 +00:00
parent 31f3c79b44
commit b9549e9dc7
1 changed files with 9 additions and 2 deletions
Download patch file Download diff file Expand all files Collapse all files

11
lisp/emacs-lisp/debug.el
View file

@ -314,8 +314,15 @@ That buffer should be current already."
(save-excursion
(while (re-search-forward "^ eval-buffer(" nil t)
(end-of-line)
(insert (format "\n ;;; Reading at buffer position %d"
(with-current-buffer (nth 2 (backtrace-frame (debugger-frame-number)))
(insert (format " ; Reading at buffer position %d"
(with-current-buffer
(or (nth 2 (backtrace-frame (debugger-frame-number)))
debugger-old-buffer)
(point)))))
(while (re-search-forward "^ eval-region(" nil t)
(end-of-line)
(insert (format " ; Reading at buffer position %d"
(with-current-buffer debugger-old-buffer
(point))))))
(debugger-make-xrefs))