aboutsummaryrefslogtreecommitdiffstats
path: root/lisp/progmodes
diff options
context:
space:
mode:
authorAndreas Schwab2012-02-05 09:06:37 +0100
committerAndreas Schwab2012-02-05 09:06:37 +0100
commit1ff980ae49715eb372acff8a193e36497a7665c4 (patch)
treef88e1936bde56f306d777c9f23885cd8bb8e0917 /lisp/progmodes
parent03988c98dfbb4506ada95f52e4a34071627c3b49 (diff)
downloademacs-1ff980ae49715eb372acff8a193e36497a7665c4.tar.gz
emacs-1ff980ae49715eb372acff8a193e36497a7665c4.zip
* progmodes/gud.el (gud-pv): Use pv instead of pv1.
* progmodes/gdb-mi.el (gud-pp): Use pp instead of pp1.
Diffstat (limited to 'lisp/progmodes')
-rw-r--r--lisp/progmodes/gdb-mi.el6
-rw-r--r--lisp/progmodes/gud.el2
2 files changed, 4 insertions, 4 deletions
diff --git a/lisp/progmodes/gdb-mi.el b/lisp/progmodes/gdb-mi.el
index 1f134755e7c..301714ec55f 100644
--- a/lisp/progmodes/gdb-mi.el
+++ b/lisp/progmodes/gdb-mi.el
@@ -779,9 +779,9 @@ detailed description of this mode.
779 (gud-def gud-pp 779 (gud-def gud-pp
780 (gud-call 780 (gud-call
781 (concat 781 (concat
782 "pp1 " (if (eq (buffer-local-value 782 "pp " (if (eq (buffer-local-value
783 'major-mode (window-buffer)) 'speedbar-mode) 783 'major-mode (window-buffer)) 'speedbar-mode)
784 (gdb-find-watch-expression) "%e")) arg) 784 (gdb-find-watch-expression) "%e")) arg)
785 nil "Print the Emacs s-expression.") 785 nil "Print the Emacs s-expression.")
786 786
787 (define-key gud-minor-mode-map [left-margin mouse-1] 787 (define-key gud-minor-mode-map [left-margin mouse-1]
diff --git a/lisp/progmodes/gud.el b/lisp/progmodes/gud.el
index f024fbd5dfc..121a023cd54 100644
--- a/lisp/progmodes/gud.el
+++ b/lisp/progmodes/gud.el
@@ -749,7 +749,7 @@ directory and source-file directory for your debugger."
749 "Evaluate C dereferenced pointer expression at point.") 749 "Evaluate C dereferenced pointer expression at point.")
750 750
751 ;; For debugging Emacs only. 751 ;; For debugging Emacs only.
752 (gud-def gud-pv "pv1 %e" "\C-v" "Print the value of the lisp variable.") 752 (gud-def gud-pv "pv %e" "\C-v" "Print the value of the lisp variable.")
753 753
754 (gud-def gud-until "until %l" "\C-u" "Continue to current line.") 754 (gud-def gud-until "until %l" "\C-u" "Continue to current line.")
755 (gud-def gud-run "run" nil "Run the program.") 755 (gud-def gud-run "run" nil "Run the program.")