From 9e46efac61fc4246b810c8b19127248ed7b3080e Mon Sep 17 00:00:00 2001 From: Case Duckworth Date: Wed, 5 Jan 2022 17:12:32 -0600 Subject: Lots of changes, maybe breaking something I have to do a big debugging tonight. Keybinds aren't getting picked up, idk what's going on. --- lisp/+lookup.el | 16 +++++++++++----- 1 file changed, 11 insertions(+), 5 deletions(-) (limited to 'lisp/+lookup.el') 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 @@ ;;; 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.") +(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 -- cgit 1.4.1-21-gabe81