From 16588181737d6547574f7b69faf5136ec12b204c Mon Sep 17 00:00:00 2001 From: Craig Jennings Date: Fri, 23 May 2025 15:08:05 -0500 Subject: add jump to keybinding for reference.org --- modules/keybindings.el | 12 ++++++------ modules/user-constants.el | 3 +++ 2 files changed, 9 insertions(+), 6 deletions(-) (limited to 'modules') diff --git a/modules/keybindings.el b/modules/keybindings.el index 4de768f03..1212ea514 100644 --- a/modules/keybindings.el +++ b/modules/keybindings.el @@ -41,10 +41,10 @@ ^Applications^ ^Communication^ ^Utilities^ ^Entertainment ^^^^^^^^-------------------------------------------------------------------------------- _f_: Feed Reader _m_: Mu4e Email _p_: Open Project _r_: Play Radio - _b_: Ebook Manager _t_: Telegram _c_: Calculator _g_: Games Menu - _F_: File Manager _i_: IRC _W_: World Clock - _l_: Ledger Accounting ^^ _z_: Diff Directories - _d_: Flashcard Drill ^^ ^^ + _b_: Ebook Manager _i_: IRC _c_: Calculator _g_: Games Menu + _F_: File Manager ^^ _W_: World Clock + _d_: Flashcard Drill ^^ _z_: Diff Directories + ^^ ^^ ^^ ^^ ^^ _q_: quit \n\n " @@ -53,12 +53,10 @@ ("f" elfeed-dashboard) ("b" calibredb) ("F" (dirvish user-home-dir)) - ("l" (find-file ledger-file)) ("d" cj/drill-start) ;; Communication ("m" mu4e) - ("t" telega) ("i" cj/erc-start-or-switch) ;; Utilities @@ -81,6 +79,8 @@ "Jump-to commonly used files/directories/commands.") (global-set-key (kbd "C-c j") jump-to-keymap) +(define-key jump-to-keymap (kbd "r") + #'(lambda () (interactive) (find-file reference-file))) (define-key jump-to-keymap (kbd "s") #'(lambda () (interactive) (find-file schedule-file))) (define-key jump-to-keymap (kbd "i") diff --git a/modules/user-constants.el b/modules/user-constants.el index 11872474a..835b5b410 100644 --- a/modules/user-constants.el +++ b/modules/user-constants.el @@ -69,6 +69,9 @@ (defvar contacts-file (concat sync-dir "contacts.org") "The location of the org file containing org-contacts information.") +(defvar reference-file (concat sync-dir "reference.org") + "The location of the org file containing reference information.") + (defvar article-file (concat sync-dir "article-inbox.org") "The location of the org file containing new clipped pages to review.") -- cgit v1.2.3