[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
[elpa] master e04eeb2 117/215: Improve eval: run on region if active, an
From: |
Rocky Bernstein |
Subject: |
[elpa] master e04eeb2 117/215: Improve eval: run on region if active, and fall back to prompting |
Date: |
Sat, 30 Jul 2016 14:48:58 +0000 (UTC) |
branch: master
commit e04eeb221f22ad1ce42554946bc3b31839088546
Author: Clément Pit--Claudel <address@hidden>
Commit: Clément Pit--Claudel <address@hidden>
Improve eval: run on region if active, and fall back to prompting
Part of #83: makes C-c e in realgud:gdb-short-key-mode-map mostly
redundant.
---
realgud/common/cmds.el | 10 +++++++++-
realgud/common/menu.el | 4 ++--
realgud/common/shortkey.el | 2 +-
3 files changed, 12 insertions(+), 4 deletions(-)
diff --git a/realgud/common/cmds.el b/realgud/common/cmds.el
index 9ab344f..21eaa57 100644
--- a/realgud/common/cmds.el
+++ b/realgud/common/cmds.el
@@ -117,18 +117,26 @@ a shortcut for that key."
)
(defun realgud:cmd-eval(arg)
- "Exaluate an expression."
+ "Evaluate an expression."
(interactive "MEval expesssion: ")
(realgud:cmd-remap arg "eval" "eval %s" "e")
)
(defun realgud:cmd-eval-region(start end)
+ "Evaluate current region."
(interactive "r")
(let ((text (buffer-substring-no-properties start end)))
(realgud:cmd-remap text "eval" "eval %s" "e")
)
)
+(defun realgud:cmd-eval-dwim()
+ "Eval the current region if active; otherwise, prompt."
+ (interactive)
+ (call-interactively (if (region-active-p)
+ #'realgud:cmd-eval-region
+ #'realgud:cmd-eval)))
+
(defun realgud:cmd-finish(&optional arg)
"Run until the completion of the current stack frame.
diff --git a/realgud/common/menu.el b/realgud/common/menu.el
index 94d1385..efab31a 100644
--- a/realgud/common/menu.el
+++ b/realgud/common/menu.el
@@ -152,9 +152,9 @@ menu. (The common map typically contains function key
bindings.)"
))
(define-key debugger-map [eval]
- (realgud-menu-item debugger-map "Evaluate Region"
'realgud:cmd-eval-region
+ (realgud-menu-item debugger-map "Evaluate region or string"
'realgud:cmd-eval-dwim
:enable '(realgud-get-process)
- :help (documentation 'realgud:cmd-eval-region)
+ :help (documentation 'realgud:cmd-eval-dwim)
))
(define-key debugger-map [Recenter]
diff --git a/realgud/common/shortkey.el b/realgud/common/shortkey.el
index 4adecc2..c236237 100644
--- a/realgud/common/shortkey.el
+++ b/realgud/common/shortkey.el
@@ -43,7 +43,7 @@
(define-key map "9" 'realgud:goto-loc-hist-9)
(define-key map "b" 'realgud:cmd-break)
(define-key map "c" 'realgud:cmd-continue)
- (define-key map "e" 'realgud:cmd-eval-region)
+ (define-key map "e" 'realgud:cmd-eval-dwim)
(define-key map "U" 'realgud:cmd-until)
(define-key map [mouse-2] 'realgud:tooltip-eval)
- [elpa] master ba97f2b 126/215: Merge pull request #93 from cpitclaudel/small-fixes-in-cmds, (continued)
- [elpa] master ba97f2b 126/215: Merge pull request #93 from cpitclaudel/small-fixes-in-cmds, Rocky Bernstein, 2016/07/30
- [elpa] master 0f6b10f 148/215: Add python3 shebang to fringe-utils.py, Rocky Bernstein, 2016/07/30
- [elpa] master 72c83d7 114/215: Improve command mappings in pdb-command-hash, Rocky Bernstein, 2016/07/30
- [elpa] master ff1dfe9 078/215: Change fringe arrow background colors based on dark or light background., Rocky Bernstein, 2016/07/30
- [elpa] master 45fb7cc 085/215: Add ability to have alternate group location file and line numbers., Rocky Bernstein, 2016/07/30
- [elpa] master baab01d 061/215: Merge branch 'master' of github.com:rocky/emacs-dbgr, Rocky Bernstein, 2016/07/30
- [elpa] master d437c3d 113/215: Merge pull request #81 from rocky/ipdb-complete, Rocky Bernstein, 2016/07/30
- [elpa] master 5155528 105/215: Bump version, Rocky Bernstein, 2016/07/30
- [elpa] master 76cb0d4 108/215: Fix wrong setq call, Rocky Bernstein, 2016/07/30
- [elpa] master 1716c8a 109/215: Towards fixing up tab completion in ipdb., Rocky Bernstein, 2016/07/30
- [elpa] master e04eeb2 117/215: Improve eval: run on region if active, and fall back to prompting,
Rocky Bernstein <=
- [elpa] master fd00428 118/215: Merge pull request #86 from cpitclaudel/83-improve-e-binding, Rocky Bernstein, 2016/07/30
- [elpa] master b275bd2 119/215: Improve behavior of delete, enable, and disable, Rocky Bernstein, 2016/07/30
- [elpa] master ca33520 120/215: Add a prefix arg to "continue" command, Rocky Bernstein, 2016/07/30
- [elpa] master 379528b 106/215: Disable ipdb until melpa is updated, Rocky Bernstein, 2016/07/30
- [elpa] master e049c12 124/215: Merge pull request #89 from cpitclaudel/87-improve-delete-command, Rocky Bernstein, 2016/07/30
- [elpa] master 91704f9 141/215: Automatically attach to a command buffer when enabling short-key-mode, Rocky Bernstein, 2016/07/30
- [elpa] master 40e73bc 123/215: Merge pull request #92 from cpitclaudel/82-add-safe-mode, Rocky Bernstein, 2016/07/30
- [elpa] master f3426ed 072/215: Merge branch 'master' of github.com:rocky/emacs-dbgr, Rocky Bernstein, 2016/07/30
- [elpa] master 4e85910 088/215: Add pytest error message pattern in python debuggers, Rocky Bernstein, 2016/07/30
- [elpa] master 01617c5 100/215: ipdb: add regex test, Rocky Bernstein, 2016/07/30