mmk2410/dot-emacs
1
0
Fork 0
Code Issues Pull requests Activity Actions

[tab-bar-helper] Make hydra a lot more beautiful

Browse source
This commit is contained in:
Marcel Kapfer 2022-03-30 16:54:22 +02:00
parent 0e5c445840
commit b20f578afa
Signed by: mmk2410
GPG key ID: CADE6F0C09F21B09
1 changed files with 22 additions and 8 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

30
packages/mmk2410-tab-bar-helpers.el
View file

@ -63,14 +63,28 @@
#'(lambda () #'(lambda ()
(find-file "~/org/work.projects.org")))) (find-file "~/org/work.projects.org"))))
(defhydra mmk2410/tab-bar (:color teal) (defhydra mmk2410/tab-bar (:color teal :hint nil)
"My tab-bar helpers" "
("a" mmk2410/tab-bar-run-agenda "Agenda") ^Apps^ ^Helpers^ ^Misc
("e" mmk2410/tab-bar-run-elfeed "RSS (Elfeed)") --^^^^^^---------------------------------------------
("i" mmk2410/tab-bar-run-irc "IRC (erc)") _a_: Agenda _RET_: Search _q_: Cancel
("j" mmk2410/tab-bar-run-journal "Journal") _e_: RSS (Elfeed) _SPC_: New
("m" mmk2410/tab-bar-run-mail "Mail") _i_: IRC (erc) _f_: Previous
("p" mmk2410/tab-bar-run-projects "Projects")) _j_: Journal _Q_: Close
_m_: Mail
_p_: Projects
"
("a" mmk2410/tab-bar-run-agenda)
("e" mmk2410/tab-bar-run-elfeed)
("i" mmk2410/tab-bar-run-irc)
("j" mmk2410/tab-bar-run-journal)
("m" mmk2410/tab-bar-run-mail)
("p" mmk2410/tab-bar-run-projects)
("RET" tab-bar-select-tab-by-name)
("SPC" mmk2410/tab-bar-new-named-tab)
("f" tab-bar-switch-to-recent-tab)
("Q" tab-bar-close-tab)
("q" nil))
(provide 'mmk2410-tab-bar-helpers) (provide 'mmk2410-tab-bar-helpers)