diff --git a/init.org b/init.org index 6b830a3..77a1432 100644 --- a/init.org +++ b/init.org @@ -1027,6 +1027,7 @@ Don't try to check if there are files with a certain extension...it will lead to ((derived-mode-p 'org-mode) (my-org-hydra/body)) ((derived-mode-p 'sh-mode) (my-shell-hydra/body)) ((derived-mode-p 'sql-mode) (my-sql-hydra/body)) + ((derived-mode-p 'comint-mode) (my-comint-hydra/body)) (t (my-general-hydra/body)))) (use-package boon @@ -1036,7 +1037,7 @@ Don't try to check if there are files with a certain extension...it will lead to (global-set-key (kbd "C-s") #'my-dispatch-hydra) #+END_SRC -*** shell +*** shell script #+BEGIN_SRC emacs-lisp (my-defhydra my-shell-hydra (:color blue) "Shell" @@ -1062,6 +1063,18 @@ Don't try to check if there are files with a certain extension...it will lead to ("h" my-help-hydra/body "Help")) #+END_SRC +*** comint +#+BEGIN_SRC emacs-lisp +(my-defhydra my-comint-hydra (:color blue) + "comint" + ("v" my-comint-nav-hydra/body "Set package")) + +(defhydra my-comint-nav-hydra (:color red) + "Navigation" + ("c" comint-previous-prompt "previous") + ("r" comint-next-prompt "next")) +#+END_SRC + ** marginalia :PROPERTIES: :CREATED: 2022-01-16T00:28:51+0530