branch: elpa/inf-clojure
commit 26278254c9b550aae982716ba37371583d2bb4af
Author: Bozhidar Batsov <bozhi...@tradeo.com>
Commit: Bozhidar Batsov <bozhi...@tradeo.com>
Move inf-clojure-mode menu definition
---
inf-clojure.el | 23 ++++++++++-------------
1 file changed, 10 insertions(+), 13 deletions(-)
diff --git a/inf-clojure.el b/inf-clojure.el
index f732705..9023146 100644
--- a/inf-clojure.el
+++ b/inf-clojure.el
@@ -68,21 +68,18 @@ mode. Default is whitespace followed by 0 or 1
single-letter colon-keyword
(define-key map "\C-c\C-a" 'inf-clojure-show-arglist)
(define-key map "\C-c\C-v" 'inf-clojure-show-var-documentation)
(define-key map "\C-c\C-s" 'inf-clojure-show-var-source)
+ (easy-menu-define inf-clojure-menu map
+ "Inferior Clojure Menu"
+ '("Inf-Clojure"
+ ["Eval Last Sexp" inf-clojure-eval-last-sexp t]
+ "--"
+ ["Load File..." inf-clojure-load-file t]
+ "--"
+ ["Show Arglist..." inf-clojure-show-arglist t]
+ ["Show Documentation for Var..." inf-clojure-show-var-documentation t]
+ ["Show Source for Var..." inf-clojure-show-var-source t]))
map))
-(easy-menu-define
- inf-clojure-menu
- inf-clojure-mode-map
- "Inferior Clojure Menu"
- '("Inf-Clojure"
- ["Eval Last Sexp" inf-clojure-eval-last-sexp t]
- "--"
- ["Load File..." inf-clojure-load-file t]
- "--"
- ["Show Arglist..." inf-clojure-show-arglist t]
- ["Show Documentation for Var..." inf-clojure-show-var-documentation t]
- ["Show Source for Var..." inf-clojure-show-var-source t]))
-
(defvar inf-clojure-minor-mode-map
(let ((map (make-sparse-keymap)))
(define-key map "\M-\C-x" 'inf-clojure-eval-defun) ; Gnu convention
