;;; +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)
             map)
  (define-key +key-mode-map (kbd "C-c l") (when +lookup-mode
                                            +lookup-mode-map)))

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