summary refs log tree commit diff stats
path: root/lisp/+lookup.el
blob: 755f84ee7ef24eaff32dcb89e4627c6cdbefc814 (plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
;;; +lookup.el                                       -*- lexical-binding: t; -*-

;;; Commentary:

;; I look up a lot of things in Emacs.  Let's bind them all to an easy-to-use
;; keymap.

;;; Code:

(require '+key)

(define-minor-mode +lookup-mode
  "A mode for easily looking things up."
  :lighter " l^"
  :keymap (let ((map (make-sparse-keymap)))
             (define-key map "f" #'find-function)
             (define-key map "l" #'find-library)
             (define-key map "v" #'find-variable)
             map)
  (define-key +key-mode-map (kbd "C-c l") (when +lookup-mode
                                            +lookup-mode-map)))

(defvaralias '+lookup-map '+lookup-mode-map)

(provide '+lookup)
;;; +lookup.el ends here