(gdb-edit-register-value): Use `posn-set-point' instead of `mouse-set-point'

because the latter is not fbound when configured without X.

diff --git a/lisp/ChangeLog b/lisp/ChangeLog
index 4c68d8786235e854c01195de929f26b7d369afb1..f2ff14b82d2e51cd177480fb1d839add9156c6e7 100644 (file)
--- a/lisp/ChangeLog
+++ b/lisp/ChangeLog
@@ -1,9 +1,9 @@
 2005-11-27  John Paul Wallington  <jpw@pobox.com>
 
        * progmodes/gdb-ui.el (gdb-goto-breakpoint, gdb-frames-select)
-       (gdb-threads-select): Use `posn-set-point' instead of
-       `mouse-set-point' because the latter is not fbound when configured
-       without X.
+       (gdb-threads-select, gdb-edit-register-value):
+       Use `posn-set-point' instead of `mouse-set-point' because the
+       latter is not fbound when configured without X.
 
 2005-11-27  Kim F. Storm  <storm@cua.dk>
 

diff --git a/lisp/progmodes/gdb-ui.el b/lisp/progmodes/gdb-ui.el
index 349c121269561e02436cc586efb8068483900aa3..11a1edbbecad35abe22bff5bd0e18b28e54f119d 100644 (file)
--- a/lisp/progmodes/gdb-ui.el
+++ b/lisp/progmodes/gdb-ui.el
@@ -1877,7 +1877,7 @@ static char *magick[] = {
 (defun gdb-edit-register-value (&optional event)
   (interactive (list last-input-event))
   (save-excursion
-    (if event (mouse-set-point event))
+    (if event (posn-set-point (event-end event)))
     (beginning-of-line)
     (let* ((register (current-word))
          (value (read-string (format "New value (%s): " register))))