diff options
| author | Nick Roberts <nickrob@snap.net.nz> | 2003-09-17 18:33:38 +0000 |
|---|---|---|
| committer | Nick Roberts <nickrob@snap.net.nz> | 2003-09-17 18:33:38 +0000 |
| commit | 8a7bc7b8036666697b8598760a41e4b40751b5cd (patch) | |
| tree | 7cbe7d1cbae74140ff0feeffaf1b8a6006326af8 /lisp/progmodes/gud.el | |
| parent | a85d03b77902d6a775150b4d7f5e9000ff26d138 (diff) | |
| download | emacs-8a7bc7b8036666697b8598760a41e4b40751b5cd.tar.gz | |
(perldb): Change gud-print from just "%e" to "p %e" to
actually print the value in the GUD buffer.
Diffstat (limited to 'lisp/progmodes/gud.el')
| -rw-r--r-- | lisp/progmodes/gud.el | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/lisp/progmodes/gud.el b/lisp/progmodes/gud.el index b4fdc682e6f..a0e22859457 100644 --- a/lisp/progmodes/gud.el +++ b/lisp/progmodes/gud.el @@ -1261,7 +1261,7 @@ and source-file directory for your debugger." ; (gud-def gud-finish "finish" "\C-f" "Finish executing current function.") ; (gud-def gud-up "up %p" "<" "Up N stack frames (numeric arg).") ; (gud-def gud-down "down %p" ">" "Down N stack frames (numeric arg).") - (gud-def gud-print "%e" "\C-p" "Evaluate perl expression at point.") + (gud-def gud-print "p %e" "\C-p" "Evaluate perl expression at point.") (setq comint-prompt-regexp "^ DB<+[0-9]+>+ ") (setq paragraph-start comint-prompt-regexp) |