diff options
Diffstat (limited to 'lisp/+lookup.el')
-rw-r--r-- | lisp/+lookup.el | 16 |
1 files changed, 11 insertions, 5 deletions
diff --git a/lisp/+lookup.el b/lisp/+lookup.el index dfa0180..f13f535 100644 --- a/lisp/+lookup.el +++ b/lisp/+lookup.el | |||
@@ -7,11 +7,17 @@ | |||
7 | 7 | ||
8 | ;;; Code: | 8 | ;;; Code: |
9 | 9 | ||
10 | (defvar +lookup-map (let ((map (make-sparse-keymap))) | 10 | (require '+key) |
11 | (define-key map "f" #'find-function) | 11 | |
12 | (define-key map "l" #'find-library) | 12 | (define-minor-mode +lookup-mode |
13 | map) | 13 | "A mode for easily looking things up." |
14 | "Keymap for looking up things.") | 14 | :lighter " l^" |
15 | :keymap (let ((map (make-sparse-keymap))) | ||
16 | (define-key map "f" #'find-function) | ||
17 | (define-key map "l" #'find-library) | ||
18 | map) | ||
19 | (define-key +key-mode-map (kbd "C-c l") (when +lookup-mode | ||
20 | +lookup-mode-map))) | ||
15 | 21 | ||
16 | (provide '+lookup) | 22 | (provide '+lookup) |
17 | ;;; +lookup.el ends here | 23 | ;;; +lookup.el ends here |