Add keymap to open/refresh dashboard

Replace use of keymap-set global-map with keymap-global-set for brevity
This commit is contained in:
Evie Litherland-Smith 2023-11-04 12:23:46 +00:00
parent ecab40b62b
commit 48aa8b1a5a
6 changed files with 20 additions and 19 deletions

View file

@ -21,13 +21,13 @@
(delete-selection-mode) (delete-selection-mode)
;; Misc useful keymaps ;; Misc useful keymaps
(keymap-set global-map "M-#" #'dictionary-lookup-definition) (keymap-global-set "M-#" #'dictionary-lookup-definition)
(keymap-set global-map "C-c r" #'recentf) (keymap-global-set "C-c r" #'recentf)
(keymap-set global-map "C-c b" #'ibuffer) (keymap-global-set "C-c b" #'ibuffer)
(keymap-set global-map "C-c p l" #'list-packages) (keymap-global-set "C-c p l" #'list-packages)
(keymap-set global-map "C-c p r" #'package-refresh-contents) (keymap-global-set "C-c p r" #'package-refresh-contents)
(keymap-set global-map "C-c p i" #'package-install) (keymap-global-set "C-c p i" #'package-install)
(keymap-set global-map "C-c p d" #'package-delete) (keymap-global-set "C-c p d" #'package-delete)
;; turn on spell checking, if available. ;; turn on spell checking, if available.
(when (and (require 'ispell nil :noerror) (executable-find ispell-program-name)) (when (and (require 'ispell nil :noerror) (executable-find ispell-program-name))

View file

@ -42,9 +42,9 @@
(:maildir "/Outlook/Inbox/" :key ?w))) (:maildir "/Outlook/Inbox/" :key ?w)))
(when (require 'mu4e nil :noerror) (when (require 'mu4e nil :noerror)
(keymap-set global-map "C-c m m" #'mu4e) (keymap-global-set "C-c m m" #'mu4e)
(keymap-set global-map "C-c m u" #'mu4e-update-index) (keymap-global-set "C-c m u" #'mu4e-update-index)
(keymap-set global-map "C-c m c" #'mu4e-compose-new) (keymap-global-set "C-c m c" #'mu4e-compose-new)
(when (require 'mu4e-alert nil :noerror) (when (require 'mu4e-alert nil :noerror)
(mu4e-alert-set-default-style 'libnotify) (mu4e-alert-set-default-style 'libnotify)

View file

@ -4,7 +4,7 @@
rmh-elfeed-org-files (list (expand-file-name "feeds.org" elfeed-base-directory)))) rmh-elfeed-org-files (list (expand-file-name "feeds.org" elfeed-base-directory))))
(when (require 'elfeed nil :noerror) (when (require 'elfeed nil :noerror)
(keymap-set global-map "C-c f f" #'elfeed) (keymap-global-set "C-c f f" #'elfeed)
(add-hook 'elfeed-search-mode-hook #'elfeed-update) (add-hook 'elfeed-search-mode-hook #'elfeed-update)
(when (require 'elfeed-org nil :noerror) (when (require 'elfeed-org nil :noerror)
(elfeed-org)) (elfeed-org))

View file

@ -6,7 +6,7 @@
(setq apheleia-remote-algorithm 'local) (setq apheleia-remote-algorithm 'local)
(when (require 'apheleia nil :noerror) (when (require 'apheleia nil :noerror)
(keymap-set global-map "C-c c f" #'apheleia-format-buffer) (keymap-global-set "C-c c f" #'apheleia-format-buffer)
(apheleia-global-mode +1)) (apheleia-global-mode +1))
(when (require 'eglot nil :noerror) (when (require 'eglot nil :noerror)

View file

@ -21,13 +21,13 @@
org-outline-path-complete-in-steps nil org-outline-path-complete-in-steps nil
org-default-notes-file (expand-file-name "notes.org" org-directory)) org-default-notes-file (expand-file-name "notes.org" org-directory))
(keymap-set global-map "C-c o a" #'org-agenda) (keymap-global-set "C-c o a" #'org-agenda)
(keymap-set global-map "C-c o n" #'org-capture) (keymap-global-set "C-c o n" #'org-capture)
(keymap-set global-map "C-c o l" #'org-capture-goto-last-stored) (keymap-global-set "C-c o l" #'org-capture-goto-last-stored)
(keymap-set global-map "C-c o c" #'org-goto-calendar) (keymap-global-set "C-c o c" #'org-goto-calendar)
(keymap-set global-map "C-c o j j" #'org-journal-new-entry) (keymap-global-set "C-c o j j" #'org-journal-new-entry)
(keymap-set global-map "C-c o j n" #'org-journal-new-date-entry) (keymap-global-set "C-c o j n" #'org-journal-new-date-entry)
(keymap-set global-map "C-c o j s" #'org-journal-new-scheduled-entry) (keymap-global-set "C-c o j s" #'org-journal-new-scheduled-entry)
(add-hook 'org-mode-hook #'org-modern-mode) (add-hook 'org-mode-hook #'org-modern-mode)
(add-hook 'org-agenda-finalize-hook #'org-modern-agenda) (add-hook 'org-agenda-finalize-hook #'org-modern-agenda)

View file

@ -83,6 +83,7 @@
" HHH HHHHHH \n" " HHH HHHHHH \n"
" HHHHH HH \n")) " HHHHH HH \n"))
(when (require 'dashboard nil :noerror) (when (require 'dashboard nil :noerror)
(keymap-global-set "C-c d" #'dashboard-open)
(add-hook 'dashboard-mode-hook #'khalel-import-events)) (add-hook 'dashboard-mode-hook #'khalel-import-events))
;; Extra minor-modes ;; Extra minor-modes