changeset 93619:a1760b9403f6

(gdb-mouse-set-clear-breakpoint): Fix in disassembly buffer (regression in 22.2).
author Nick Roberts <nickrob@snap.net.nz>
date Thu, 03 Apr 2008 21:34:56 +0000
parents 9ec44dd2700c
children dfdeba5ae4fd
files lisp/progmodes/gdb-ui.el
diffstat 1 files changed, 3 insertions(+), 2 deletions(-) [+]
line wrap: on
line diff
--- a/lisp/progmodes/gdb-ui.el	Thu Apr 03 21:33:23 2008 +0000
+++ b/lisp/progmodes/gdb-ui.el	Thu Apr 03 21:34:56 2008 +0000
@@ -1979,11 +1979,12 @@
 (declare-function gud-break  "gdb-ui" t t) ; gud-def
 
 (defun gdb-mouse-set-clear-breakpoint (event)
-  "Set/clear breakpoint in left fringe/margin with mouse click."
+  "Set/clear breakpoint in left fringe/margin at mouse click.
+If not in a source or disassembly buffer just set point."
   (interactive "e")
   (mouse-minibuffer-check event)
   (let ((posn (event-end event)))
-    (if (buffer-file-name)
+    (if (or (buffer-file-name) (eq major-mode 'gdb-assembler-mode))
 	(if (numberp (posn-point posn))
 	    (with-selected-window (posn-window posn)
 	      (save-excursion