Add +lookup

This commit is contained in:
Case Duckworth 2022-01-05 11:23:47 -06:00
parent 710dfe7cd5
commit a59178fc7b
2 changed files with 20 additions and 0 deletions

View File

@ -59,6 +59,9 @@
(setup (:require +key)
(+ensure-after-init #'+key-global-mode))
(setup (:require +lookup)
(:+key "C-c l" +lookup-map))
(setup (:require auth-source)
(:option auth-sources (list (private/ "authinfo"))))

17
lisp/+lookup.el Normal file
View File

@ -0,0 +1,17 @@
;;; +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:
(defvar +lookup-map (let ((map (make-sparse-keymap)))
(define-key map "f" #'find-function)
(define-key map "l" #'find-library)
map)
"Keymap for looking up things.")
(provide '+lookup)
;;; +lookup.el ends here