[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
[nongnu] elpa/inf-clojure f4f94f8 010/313: Introduce inf-clojure-minor-m
From: |
ELPA Syncer |
Subject: |
[nongnu] elpa/inf-clojure f4f94f8 010/313: Introduce inf-clojure-minor-mode |
Date: |
Wed, 11 Aug 2021 09:59:36 -0400 (EDT) |
branch: elpa/inf-clojure
commit f4f94f892f29f92ca06ea9e945f3b91abf6d7a4d
Author: Bozhidar Batsov <bozhidar@tradeo.com>
Commit: Bozhidar Batsov <bozhidar@tradeo.com>
Introduce inf-clojure-minor-mode
---
inf-clojure.el | 51 +++++++++++++++++++++++++++++++++++++--------------
1 file changed, 37 insertions(+), 14 deletions(-)
diff --git a/inf-clojure.el b/inf-clojure.el
index 120dc32..a48687c 100644
--- a/inf-clojure.el
+++ b/inf-clojure.el
@@ -25,8 +25,18 @@
;; along with GNU Emacs. If not, see <http://www.gnu.org/licenses/>.
;;; Commentary:
-
+;;
;; inf-lisp adapted for Clojure.
+;;
+;; If you're installing manually, you'll need to:
+;; * drop the file somewhere on your load path (perhaps ~/.emacs.d)
+;; * Add the following lines to your .emacs file:
+;;
+;; (autoload 'inf-clojure "inf-clojure" "Run an inferior Clojure process" t)
+;; (add-hook 'clojure-mode-hook 'inf-clojure-minor-mode)
+;;
+;; Installation via ELPA interface does the above for you
+;; automatically.
;;; Code:
@@ -76,19 +86,29 @@ mode. Default is whitespace followed by 0 or 1
single-letter colon-keyword
["Show Documentation for Var..." clojure-show-var-documentation t]
["Show Source for Var..." clojure-show-var-source t]))
-;;; These commands augment Clojure mode, so you can process Clojure code in
-;;; the source files.
-(define-key clojure-mode-map "\M-\C-x" 'clojure-eval-defun) ; Gnu
convention
-(define-key clojure-mode-map "\C-x\C-e" 'clojure-eval-last-sexp) ; Gnu
convention
-(define-key clojure-mode-map "\C-c\C-e" 'clojure-eval-defun)
-(define-key clojure-mode-map "\C-c\C-r" 'clojure-eval-region)
-(define-key clojure-mode-map "\C-c\C-n" 'clojure-eval-form-and-next)
-(define-key clojure-mode-map "\C-c\C-p" 'clojure-eval-paragraph)
-(define-key clojure-mode-map "\C-c\C-z" 'switch-to-clojure)
-(define-key clojure-mode-map "\C-c\C-l" 'clojure-load-file)
-(define-key clojure-mode-map "\C-c\C-a" 'clojure-show-arglist)
-(define-key clojure-mode-map "\C-c\C-v" 'clojure-show-var-documentation)
-(define-key clojure-mode-map "\C-c\C-s" 'clojure-show-var-source)
+(defvar inf-clojure-minor-mode-map
+ (let ((map (make-sparse-keymap)))
+ (define-key map "\M-\C-x" 'clojure-eval-defun) ; Gnu convention
+ (define-key map "\C-x\C-e" 'clojure-eval-last-sexp) ; Gnu convention
+ (define-key map "\C-c\C-e" 'clojure-eval-defun)
+ (define-key map "\C-c\C-r" 'clojure-eval-region)
+ (define-key map "\C-c\C-n" 'clojure-eval-form-and-next)
+ (define-key map "\C-c\C-p" 'clojure-eval-paragraph)
+ (define-key map "\C-c\C-z" 'switch-to-clojure)
+ (define-key map "\C-c\C-l" 'clojure-load-file)
+ (define-key map "\C-c\C-a" 'clojure-show-arglist)
+ (define-key map "\C-c\C-v" 'clojure-show-var-documentation)
+ (define-key map "\C-c\C-s" 'clojure-show-var-source)
+ map))
+
+;;;###autoload
+(define-minor-mode inf-clojure-minor-mode
+ "Minor mode for interacting with the inferior Clojure process buffer.
+
+The following commands are available:
+
+\\{inf-clojure-minor-mode-map}"
+ :lighter "" :keymap inf-clojure-minor-mode-map)
(defcustom inf-clojure-program "lein repl"
"Program name for invoking an inferior Clojure in Inferior Clojure mode."
@@ -489,6 +509,9 @@ Returns the selected completion or nil."
(completion-table-with-cache #'inf-clojure-completions)
(completion-table-dynamic #'inf-clojure-completions))))))
+;;;###autoload
+(dolist (mode clojure-source-modes)
+ (add-hook (intern (format "%s-hook" mode)) 'inf-clojure-minor-mode))
(provide 'inf-clojure)
- [nongnu] branch elpa/inf-clojure created (now 3d31bee), ELPA Syncer, 2021/08/11
- [nongnu] elpa/inf-clojure a1ae48a 002/313: Add package headers, ELPA Syncer, 2021/08/11
- [nongnu] elpa/inf-clojure 1c9a301 004/313: Fix some incorrect command references, ELPA Syncer, 2021/08/11
- [nongnu] elpa/inf-clojure d89b8ce 005/313: [Fix #1] Get completion-at-point to a working state, ELPA Syncer, 2021/08/11
- [nongnu] elpa/inf-clojure 3e27093 001/313: Initial commit, ELPA Syncer, 2021/08/11
- [nongnu] elpa/inf-clojure f4f94f8 010/313: Introduce inf-clojure-minor-mode,
ELPA Syncer <=
- [nongnu] elpa/inf-clojure 4721b8c 011/313: Fix a docstring, ELPA Syncer, 2021/08/11
- [nongnu] elpa/inf-clojure 25aee78 006/313: Use clojure-mode-variables instead of lisp-mode-variables, ELPA Syncer, 2021/08/11
- [nongnu] elpa/inf-clojure c66c08f 003/313: Use lexical binding, ELPA Syncer, 2021/08/11
- [nongnu] elpa/inf-clojure 1f6f949 019/313: Add command inf-clojure-set-ns, ELPA Syncer, 2021/08/11
- [nongnu] elpa/inf-clojure ca57a86 020/313: [Fix #3] Remove automatic addition of inf-clojure-minor-mode to clojure-mode-hook, ELPA Syncer, 2021/08/11
- [nongnu] elpa/inf-clojure 7272678 007/313: clojure -> Clojure, ELPA Syncer, 2021/08/11
- [nongnu] elpa/inf-clojure 1392907 015/313: Add command clojure-show-ns-vars, ELPA Syncer, 2021/08/11
- [nongnu] elpa/inf-clojure 1dfc5f7 023/313: Depend of clojure-mode 4.0, ELPA Syncer, 2021/08/11
- [nongnu] elpa/inf-clojure 5debecc 024/313: Release 1.0, ELPA Syncer, 2021/08/11
- [nongnu] elpa/inf-clojure b61efe1 008/313: Make the completion command customizable, ELPA Syncer, 2021/08/11