summaryrefslogtreecommitdiff
path: root/modules/keybindings.el
diff options
context:
space:
mode:
Diffstat (limited to 'modules/keybindings.el')
-rw-r--r--modules/keybindings.el25
1 files changed, 25 insertions, 0 deletions
diff --git a/modules/keybindings.el b/modules/keybindings.el
index 5d8b6bdd..4de768f0 100644
--- a/modules/keybindings.el
+++ b/modules/keybindings.el
@@ -73,6 +73,31 @@
(global-set-key (kbd "C-c ?") 'hydra-general/body)
+
+;; ------------------------------ Jump To Commands -----------------------------
+;; quick access for commonly used files
+
+(defvar jump-to-keymap (make-sparse-keymap)
+ "Jump-to commonly used files/directories/commands.")
+(global-set-key (kbd "C-c j") jump-to-keymap)
+
+(define-key jump-to-keymap (kbd "s")
+ #'(lambda () (interactive) (find-file schedule-file)))
+(define-key jump-to-keymap (kbd "i")
+ #'(lambda () (interactive) (find-file inbox-file)))
+(define-key jump-to-keymap (kbd "c")
+ #'(lambda () (interactive) (find-file contacts-file)))
+(define-key jump-to-keymap (kbd "a")
+ #'(lambda () (interactive) (find-file article-file)))
+(define-key jump-to-keymap (kbd "A")
+ #'(lambda () (interactive) (find-file article-archive)))
+(define-key jump-to-keymap (kbd "$")
+ #'(lambda () (interactive) (find-file ledger-file)))
+(define-key jump-to-keymap (kbd "m")
+ #'(lambda () (interactive) (find-file macros-file)))
+(define-key jump-to-keymap (kbd "I")
+ #'(lambda () (interactive) (find-file emacs-init-file)))
+
;; ---------------------------- General Keybindings ----------------------------
;; Avoid hostile bindings