summaryrefslogtreecommitdiff
path: root/cider-macroexpansion.el
diff options
context:
space:
mode:
authorBozhidar Batsov <bozhidar@tradeo.com>2014-07-28 18:43:25 +0300
committerBozhidar Batsov <bozhidar@tradeo.com>2014-07-28 18:43:25 +0300
commitb0cee9ec16aaefe93fa3445549259d45c64beab9 (patch)
tree4cef691e7277cdd4f6f887d50f048a377854ed53 /cider-macroexpansion.el
parent8a45d2c49474a1d9a86a929596255583d61d9e3a (diff)
Add a menu for cider-macroexpansion-minor-mode
Diffstat (limited to 'cider-macroexpansion.el')
-rw-r--r--cider-macroexpansion.el10
1 files changed, 10 insertions, 0 deletions
diff --git a/cider-macroexpansion.el b/cider-macroexpansion.el
index bb949de1..9205aecb 100644
--- a/cider-macroexpansion.el
+++ b/cider-macroexpansion.el
@@ -149,6 +149,16 @@ and point is placed at CURRENT-POINT."
(define-key map (kbd "d") 'cider-doc)
(define-key map (kbd "j") 'cider-doc-javadoc)
(define-key map (kbd ".") 'cider-jump-to-var)
+ (easy-menu-define cider-macroexpansion-minor-mode-menu map
+ "Menu for CIDER's doc mode"
+ '("Macroexpansion"
+ ["Restart expansion" cider-macroexpand-again]
+ ["Macroexpand-1" cider-macroexpand-1-inplace]
+ ["Macroexpand-all" cider-macroexpand-all-inplace]
+ ["Go to source" cider-jump-to-var]
+ ["Go to doc" cider-doc]
+ ["Go to Javadoc" cider-doc-javadoc]
+ ["Quit" cider-popup-buffer-quit-function]))
(cl-labels ((redefine-key (from to)
(dolist (mapping (where-is-internal from cider-mode-map))
(define-key map mapping to))))