diff options
| author | Nick Roberts <nickrob@snap.net.nz> | 2006-05-03 00:17:35 +0000 |
|---|---|---|
| committer | Nick Roberts <nickrob@snap.net.nz> | 2006-05-03 00:17:35 +0000 |
| commit | 9d6bb9e0af2671a4deca1509f4a2d5655400f67a (patch) | |
| tree | d8b056460acfdacae93f85e7b08b325b070869d5 /lisp/progmodes/gdb-ui.el | |
| parent | cea3f866ce0df44b5a3ff04be3cf7fe09b9e7364 (diff) | |
| download | emacs-9d6bb9e0af2671a4deca1509f4a2d5655400f67a.tar.gz emacs-9d6bb9e0af2671a4deca1509f4a2d5655400f67a.tar.bz2 emacs-9d6bb9e0af2671a4deca1509f4a2d5655400f67a.zip | |
(gud-watch): Let user select an expression.
(menu): Fix typo.
Diffstat (limited to 'lisp/progmodes/gdb-ui.el')
| -rw-r--r-- | lisp/progmodes/gdb-ui.el | 13 |
1 files changed, 8 insertions, 5 deletions
diff --git a/lisp/progmodes/gdb-ui.el b/lisp/progmodes/gdb-ui.el index a5163319fbf..4b3202c6e41 100644 --- a/lisp/progmodes/gdb-ui.el +++ b/lisp/progmodes/gdb-ui.el @@ -690,10 +690,13 @@ With arg, enter name of variable to be watched in the minibuffer." (if event (posn-set-point (event-end event))) (require 'tooltip) (save-selected-window - (let ((expr (if arg - (completing-read "Name of variable: " - 'gud-gdb-complete-command) - (tooltip-identifier-from-point (point))))) + (let ((expr + (if arg + (completing-read "Name of variable: " + 'gud-gdb-complete-command) + (if (and transient-mark-mode mark-active) + (buffer-substring (region-beginning) (region-end)) + (tooltip-identifier-from-point (point)))))) (catch 'already-watched (dolist (var gdb-var-list) (unless (string-match "\\." (car var)) @@ -2691,7 +2694,7 @@ corresponding to the mode line clicked." '(menu-item "Inferior IO" gdb-frame-separate-io-buffer :enable gdb-use-separate-io-buffer)) (define-key menu [registers] '("Registers" . gdb-frame-registers-buffer)) - (define-key menu [disassembly] '("Disassembiy" . gdb-frame-assembler-buffer)) + (define-key menu [disassembly] '("Disassembly" . gdb-frame-assembler-buffer)) (define-key menu [breakpoints] '("Breakpoints" . gdb-frame-breakpoints-buffer)) (define-key menu [locals] '("Locals" . gdb-frame-locals-buffer)) |