[Emacs-diffs] Changes to emacs/lisp/progmodes/gdb-ui.el, v [EMACS_22_BASE]

[Nick Roberts]

CVSROOT:        /sources/emacs
Module name:    emacs
Branch:         EMACS_22_BASE
Changes by:     Nick Roberts <nickrob>  08/02/20 19:57:10

Index: gdb-ui.el
===================================================================
RCS file: /sources/emacs/emacs/lisp/progmodes/gdb-ui.el,v
retrieving revision 1.206.2.19
retrieving revision 1.206.2.20
diff -u -b -r1.206.2.19 -r1.206.2.20
--- gdb-ui.el   19 Feb 2008 09:50:24 -0000      1.206.2.19
+++ gdb-ui.el   20 Feb 2008 19:57:10 -0000      1.206.2.20
@@ -1972,6 +1972,7 @@
   (interactive "e")
   (mouse-minibuffer-check event)
   (let ((posn (event-end event)))
+    (if (buffer-file-name)
     (if (numberp (posn-point posn))
        (with-selected-window (posn-window posn)
          (save-excursion
@@ -1980,7 +1981,8 @@
                    (eq (car (fringe-bitmaps-at-pos (posn-point posn)))
                        'breakpoint))
                (gud-remove nil)
-             (gud-break nil)))))))
+                 (gud-break nil)))))
+      (posn-set-point posn))))
 
 (defun gdb-mouse-toggle-breakpoint-margin (event)
   "Enable/disable breakpoint in left margin with mouse click."