(gud-gdb-goto-stackframe, gud-gdb-get-stackframe): Add

server prefix to the gdb commands used by the speedbar.

diff --git a/lisp/gud.el b/lisp/gud.el
index 7cd11a40477847b6beac926aef586dcd0238cbbb..45ffeddf68df0a5e73f179e71a74110f4fe039dc 100644 (file)
--- a/lisp/gud.el
+++ b/lisp/gud.el
@@ -578,7 +578,7 @@ It is passed through FILTER before we look at it."
 (defun gud-gdb-goto-stackframe (text token indent)
   "Goto the stackframe described by TEXT, TOKEN, and INDENT."
   (speedbar-with-attached-buffer
-   (gud-basic-call (concat "frame " (nth 1 token)))
+   (gud-basic-call (concat "server frame " (nth 1 token)))
    (sit-for 1)))
 
 (defvar gud-gdb-fetched-stack-frame nil
@@ -599,7 +599,7 @@ It is passed through FILTER before we look at it."
   "Extract the current stack frame out of the GUD GDB BUFFER."
   (let ((newlst nil)
        (fetched-stack-frame-list
-        (gud-gdb-run-command-fetch-lines "backtrace" buffer)))
+        (gud-gdb-run-command-fetch-lines "server backtrace" buffer)))
     (if (and (car fetched-stack-frame-list)
             (string-match "No stack" (car fetched-stack-frame-list)))
        ;; Go into some other mode???