From 79669f88b4ebe0672e836560d0e5006ec1f6cd49 Mon Sep 17 00:00:00 2001 From: Nick Roberts Date: Thu, 3 Apr 2008 21:34:56 +0000 Subject: [PATCH] (gdb-mouse-set-clear-breakpoint): Fix in disassembly buffer (regression in 22.2). --- lisp/progmodes/gdb-ui.el | 5 +++-- 1 file changed, 3 insertions(+), 2 deletions(-) diff --git a/lisp/progmodes/gdb-ui.el b/lisp/progmodes/gdb-ui.el index 7cbea06889f..08c5df7b727 100644 --- a/lisp/progmodes/gdb-ui.el +++ b/lisp/progmodes/gdb-ui.el @@ -1979,11 +1979,12 @@ static char *magick[] = { (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 -- 2.39.5