summaryrefslogtreecommitdiff
path: root/.emacs.d/modules/thanos-tools.el
diff options
context:
space:
mode:
authorThanos Apollo <[email protected]>2023-10-08 18:53:03 +0300
committerThanos Apollo <[email protected]>2023-10-08 18:53:42 +0300
commiteee58e52994eeb51f805fe2598aab3795bbe555a (patch)
treefb982f459a6f160aa45fdb6554200a3f889a715c /.emacs.d/modules/thanos-tools.el
parent81d3be863e3df019aa76de4a17cc30c014bdcb68 (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.el8
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")