# HG changeset patch # User Nick Roberts <nickrob@snap.net.nz> # Date 1108585396 0 # Node ID 106946a8423d9a27c96282e26746381d18c6bf76 # Parent f727e03680563c703c8c9e35da40c9e1333d7c18 (gdb-set-gud-minor-mode-existing-buffers) (gdb-find-file-hook): Add server prefix. diff -r f727e0368056 -r 106946a8423d lisp/progmodes/gdb-ui.el --- a/lisp/progmodes/gdb-ui.el Wed Feb 16 20:22:38 2005 +0000 +++ b/lisp/progmodes/gdb-ui.el Wed Feb 16 20:23:16 2005 +0000 @@ -219,7 +219,8 @@ (if file (progn (gdb-enqueue-input - (list (concat "list " (file-name-nondirectory file) ":1\n") + (list (concat gdb-server-prefix "list " + (file-name-nondirectory file) ":1\n") `(lambda () (gdb-set-gud-minor-mode ,buffer))))))))) (defun gdb-ann3 () @@ -2125,7 +2126,8 @@ (eq gud-minor-mode 'gdba))) (condition-case nil (gdb-enqueue-input - (list (concat "list " (file-name-nondirectory buffer-file-name) + (list (concat gdb-server-prefix "list " + (file-name-nondirectory buffer-file-name) ":1\n") `(lambda () (gdb-set-gud-minor-mode ,(current-buffer))))) (error (setq gdb-find-file-unhook t)))))