Add help hydra to comint hydra
This commit is contained in:
parent
2eef05cb80
commit
36759d7dfe
13
init.org
13
init.org
|
@ -1052,23 +1052,24 @@ Don't try to check if there are files with a certain extension...it will lead to
|
|||
|
||||
*** SQL
|
||||
#+BEGIN_SRC emacs-lisp
|
||||
(defhydra my-sql-eval-hydra (:color blue)
|
||||
"Eval"
|
||||
("e" sql-send-paragraph "paragraph")
|
||||
("b" sql-send-buffer "buffer"))
|
||||
|
||||
(my-defhydra my-sql-hydra (:color blue)
|
||||
"SQL"
|
||||
("r" sql-sqlite "REPL")
|
||||
("e" my-sql-eval-hydra/body "eval")
|
||||
("h" my-help-hydra/body "Help"))
|
||||
|
||||
(defhydra my-sql-eval-hydra (:color blue)
|
||||
"Eval"
|
||||
("e" sql-send-paragraph "paragraph")
|
||||
("b" sql-send-buffer "buffer"))
|
||||
#+END_SRC
|
||||
|
||||
*** comint
|
||||
#+BEGIN_SRC emacs-lisp
|
||||
(my-defhydra my-comint-hydra (:color blue)
|
||||
"comint"
|
||||
("v" my-comint-nav-hydra/body "Set package"))
|
||||
("v" my-comint-nav-hydra/body "Navigation")
|
||||
("h" my-help-hydra/body "Help"))
|
||||
|
||||
(defhydra my-comint-nav-hydra (:color red)
|
||||
"Navigation"
|
||||
|
|
Loading…
Reference in New Issue