1
0
Fork 0

[oni-core] Add hydra to launch certain applications

This commit is contained in:
Tom Willemse 2023-09-11 21:04:34 -07:00
parent e1c791f6fd
commit 120bf9048f

View file

@ -123,6 +123,15 @@ _s_: String list"
(region-beginning) (region-beginning)
(region-end)))) (region-end))))
(defhydra oni-core-applications-hydra (:color teal :hint nil)
"
^^^Applications^^^
^^--------------------^^-----------------^^--------------
_m_: Email (notmuch) _r_: RSS (elfeed) _i_: IRC (circe) "
("m" notmuch)
("r" elfeed)
("i" circe))
(add-to-list 'auto-save-file-name-transforms (add-to-list 'auto-save-file-name-transforms
`(".*" ,oni-core--auto-save-directory t) `(".*" ,oni-core--auto-save-directory t)
:append) :append)
@ -194,6 +203,7 @@ _s_: String list"
(global-set-key (kbd "C-c (") '("Embrace Commander" . embrace-commander)) (global-set-key (kbd "C-c (") '("Embrace Commander" . embrace-commander))
(global-set-key (kbd "C-c q") '("Unfill Paragraph" . oni-core-unfill-paragraph)) (global-set-key (kbd "C-c q") '("Unfill Paragraph" . oni-core-unfill-paragraph))
(global-set-key (kbd "C-c s") '("Sort and Align Commands" . oni-sort-and-align-hydra/body)) (global-set-key (kbd "C-c s") '("Sort and Align Commands" . oni-sort-and-align-hydra/body))
(global-set-key (kbd "C-c a") '("Applications" . oni-core-applications-hydra/body))
(global-set-key (kbd "C-c l") 'imenu) (global-set-key (kbd "C-c l") 'imenu)
(global-set-key (kbd "C-x C-b") '("List Buffers" . ibuffer-jump)) (global-set-key (kbd "C-x C-b") '("List Buffers" . ibuffer-jump))
(global-set-key (kbd "C-x M-f") 'ffap) (global-set-key (kbd "C-x M-f") 'ffap)