(gud-menu-map): Move parentheses (again).

(gud-speedbar-buttons): Match on "const char *" too.

diff --git a/lisp/progmodes/gud.el b/lisp/progmodes/gud.el
index 64c52101fd6876078510c59948ee879b9c13f6db..d70520bce475dd45568f4757dc310ab49a2784bc 100644 (file)
--- a/lisp/progmodes/gud.el
+++ b/lisp/progmodes/gud.el
@@ -137,18 +137,18 @@ Used to grey out relevant togolbar icons.")
                   :enable (and (not gud-running)
                               (memq gud-minor-mode '(gdbmi gdba gdb perldb)))
                  :visible (not (and (memq gud-minor-mode '(gdbmi gdba))
-                     (> (car (window-fringes 0))))))
+                     (> (car (window-fringes)) 0))))
     ([remove]  menu-item "Remove Breakpoint" gud-remove
                   :enable (not gud-running)
                  :visible (not (and (memq gud-minor-mode '(gdbmi gdba))
-                      (> (car (window-fringes 0))))))
+                      (> (car (window-fringes)) 0))))
     ([tbreak]  menu-item "Temporary Breakpoint" gud-tbreak
                  :enable (memq gud-minor-mode
                                '(gdbmi gdba gdb sdb xdb bashdb)))
     ([break]   menu-item "Set Breakpoint" gud-break
                   :enable (not gud-running)
                  :visible (not (and (memq gud-minor-mode '(gdbmi gdba))
-                      (> (car (window-fringes 0))))))
+                      (> (car (window-fringes)) 0))))
     ([up]      menu-item "Up Stack" gud-up
                  :enable (and (not gud-running)
                               (memq gud-minor-mode
@@ -424,7 +424,7 @@ required by the caller."
                        start (1+ (match-beginning 0))))
                (if (or (equal (nth 2 var) "0")
                        (and (equal (nth 2 var) "1")
-                            (equal (nth 3 var) "char *")))
+                            (string-match "char \\*" (nth 3 var))))
                    (speedbar-make-tag-line 'bracket ?? nil nil
                                            (concat (car var) "\t" (nth 4 var))
                                            'gdb-edit-value