diff options
author | Thanos Apollo <[email protected]> | 2023-10-08 18:53:03 +0300 |
---|---|---|
committer | Thanos Apollo <[email protected]> | 2023-10-08 18:53:42 +0300 |
commit | eee58e52994eeb51f805fe2598aab3795bbe555a (patch) | |
tree | fb982f459a6f160aa45fdb6554200a3f889a715c /.emacs.d/modules/thanos-tools.el | |
parent | 81d3be863e3df019aa76de4a17cc30c014bdcb68 (diff) |
emacs:(tools) Add thanos/library-search
Function to search for books in ~/Library
Diffstat (limited to '.emacs.d/modules/thanos-tools.el')
-rw-r--r-- | .emacs.d/modules/thanos-tools.el | 8 |
1 files changed, 8 insertions, 0 deletions
diff --git a/.emacs.d/modules/thanos-tools.el b/.emacs.d/modules/thanos-tools.el index b6c50ef..974baf3 100644 --- a/.emacs.d/modules/thanos-tools.el +++ b/.emacs.d/modules/thanos-tools.el @@ -75,6 +75,14 @@ (setf register-preview-delay 0.5 register-preview-function #'consult-register-format) +;; Consult custom functions +(defun thanos/library-search () + "Search for content at ~/Library using consult-find." + (interactive) + (consult-find "~/Library")) + +(define-key global-map (kbd "C-c s") 'thanos/library-search) + (defun insert-brackets (&optional arg) "Insert ARG brackets." (interactive "P") |