gdb-ui.el problem on gdb-toggle-breakpoint

[Makoto Fujiwara]

Symptoms:

In the gdb session, the gdb-toggle-breakpoint function
does not toggle enable/disable.

I have looked at little bit inside of gdb-ui.el, and 
it worked if following patch applied.
The code referred is CVS version as of checked out 2004-06-27
or around. 
   Makoto Fujiwara ( makoto at ki dot nu ),

Index: gdb-ui.el
===================================================================
RCS file: /cvsroot/emacs/emacs/lisp/progmodes/gdb-ui.el,v
retrieving revision 1.19
diff -u -r1.19 gdb-ui.el
--- gdb-ui.el   30 May 2004 00:09:37 -0000      1.19
+++ gdb-ui.el   29 Jun 2004 13:11:14 -0000
@@ -1199,18 +1199,18 @@
 (defun gdb-toggle-breakpoint ()
   "Enable/disable the breakpoint at current line."
   (interactive)
-  (save-excursion
+;  (save-excursion
     (beginning-of-line 1)
     (if (not (looking-at "\\([0-9]+\\).*point\\s-*\\S-*\\s-*\\(.\\)"))
        (error "Not recognized as break/watchpoint line")
-      (gdb-enqueue-input
-       (list
-       (concat
-        (if (eq ?y (char-after (match-beginning 2)))
-            gdb-server-prefix "disable "
-          gdb-server-prefix "enable ")
-        (match-string 1) "\n")
-       'ignore)))))
+      (let ((match (match-string 1))
+           (cmd
+            (if (eq ?y (char-after (match-beginning 2)))
+                "disable "             
+              "enable ")))
+       (gdb-enqueue-input 
+        (list (concat gdb-server-prefix cmd  match "\n")
+       'ignore ))))
 
 (defun gdb-delete-breakpoint ()
   "Delete the breakpoint at current line."



In GNU Emacs 21.3.50.2 (powerpc-unknown-netbsd1.6ZI, X toolkit, Xaw3d scroll 
bars)
 of 2004-06-26 on harry
configured using `configure '--prefix=/export/emacs''

Important settings:
  value of $LC_ALL: nil
  value of $LC_COLLATE: nil
  value of $LC_CTYPE: nil
  value of $LC_MESSAGES: nil
  value of $LC_MONETARY: nil
  value of $LC_NUMERIC: nil
  value of $LC_TIME: nil
  value of $LANG: ja_JP.eucJP
  locale-coding-system: japanese-iso-8bit
  default-enable-multibyte-characters: t

Major mode: Apropos

Minor modes in effect:
  recentf-mode: t
  auto-image-file-mode: t
  auto-insert-mode: t
  display-time-mode: t
  show-paren-mode: t
  tool-bar-mode: t
  menu-bar-mode: t
  global-font-lock-mode: t
  font-lock-mode: t
  unify-8859-on-encoding-mode: t
  utf-translate-cjk-mode: t
  column-number-mode: t
  line-number-mode: t

Recent input:
a p o r SPC DEL DEL r o SPC <return> b u g <return> 
C-x o C-x o C-x 1 C-s r e p o C-s C-s C-s C-s C-s s 
s s C-p C-s C-s r e p o C-p C-s r e p o r t C-s C-s 
C-s C-s C-s <home> C-s C-s C-s C-s C-s C-s C-s C-s 
M-x e r a p o DEL DEL DEL DEL DEL p r e DEL DEL r e 
p o DEL DEL DEL DEL DEL r e p o SPC r SPC e m SPC SPC 
<return>

Recent messages:
call-interactively: End of file during parsing
Auto-saving...done
Making completion list... [3 times]
Quit
Loading apropos...done
Mark saved where search started [2 times]
Mark set
Mark saved where search started
Making completion list...
Loading emacsbug...done