[Top][All Lists]
[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
[Emacs-diffs] Changes to emacs/lisp/progmodes/gud.el,v
From: |
Nick Roberts |
Subject: |
[Emacs-diffs] Changes to emacs/lisp/progmodes/gud.el,v |
Date: |
Thu, 12 Apr 2007 14:24:54 +0000 |
CVSROOT: /sources/emacs
Module name: emacs
Changes by: Nick Roberts <nickrob> 07/04/12 14:24:54
Index: gud.el
===================================================================
RCS file: /sources/emacs/emacs/lisp/progmodes/gud.el,v
retrieving revision 1.128
retrieving revision 1.129
diff -u -b -r1.128 -r1.129
--- gud.el 12 Apr 2007 09:11:03 -0000 1.128
+++ gud.el 12 Apr 2007 14:24:54 -0000 1.129
@@ -2304,6 +2304,8 @@
(gud-def gud-up "up\C-Mwhere" "<" "Up one stack frame.")
(gud-def gud-down "down\C-Mwhere" ">" "Up one stack frame.")
(gud-def gud-run "run" nil "Run the program.") ;if VM start
using jdb
+ (gud-def gud-print "print %e" "\C-p" "Evaluate Java expression at point.")
+
(setq comint-prompt-regexp "^> \\|^[^ ]+\\[[0-9]+\\] ")
(setq paragraph-start comint-prompt-regexp)
@@ -2853,7 +2855,9 @@
(when (looking-at comint-prompt-regexp)
(set-marker gud-delete-prompt-marker (point))
(set-marker-insertion-type gud-delete-prompt-marker t))
- (insert (concat expr " = ")))))
+ (unless (eq (buffer-local-value 'gud-minor-mode gud-comint-buffer)
+ 'jdb)
+ (insert (concat expr " = "))))))
expr))
;; The next eight functions are hacked from gdbsrc.el by
- [Emacs-diffs] Changes to emacs/lisp/progmodes/gud.el,v, Nick Roberts, 2007/04/02
- [Emacs-diffs] Changes to emacs/lisp/progmodes/gud.el,v, Nick Roberts, 2007/04/03
- [Emacs-diffs] Changes to emacs/lisp/progmodes/gud.el,v, Nick Roberts, 2007/04/09
- [Emacs-diffs] Changes to emacs/lisp/progmodes/gud.el,v, Nick Roberts, 2007/04/12
- [Emacs-diffs] Changes to emacs/lisp/progmodes/gud.el,v,
Nick Roberts <=
- [Emacs-diffs] Changes to emacs/lisp/progmodes/gud.el,v, Nick Roberts, 2007/04/28