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

(gdb-info-locals-handler): Use window point to preserve point.

Browse source 
(gdb-find-file-hook): Add doc string.
This commit is contained in:
Nick Roberts 2005-06-05 07:55:32 +00:00
parent 32759db597
commit 2884ae6dc6
1 changed files with 5 additions and 3 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

8
lisp/progmodes/gdb-ui.el
View file

@ -2058,12 +2058,12 @@ corresponding to the mode line clicked."
(replace-match " (array);\n" nil nil))))
(let ((buf (gdb-get-buffer 'gdb-locals-buffer)))
(and buf (with-current-buffer buf
(let ((p (point))
(let ((p (window-point (get-buffer-window buf 0)))
(buffer-read-only nil))
(delete-region (point-min) (point-max))
(erase-buffer)
(insert-buffer-substring (gdb-get-create-buffer
'gdb-partial-output-buffer))
(goto-char p)))))
(set-window-point (get-buffer-window buf 0) p)))))
(run-hooks 'gdb-info-locals-hook))
(defun gdb-info-locals-custom ()
@ -2341,6 +2341,8 @@ Add directory to search path for source files using the GDB command, dir."))
(add-hook 'find-file-hook 'gdb-find-file-hook)
(defun gdb-find-file-hook ()
"Set up buffer for debugging if file is part of the source code
of the current session."
(if (and (not gdb-find-file-unhook)
;; in case gud or gdb-ui is just loaded
gud-comint-buffer