[hydra] make hydra for literate-elisp

This commit is contained in:
contrapunctus 2021-12-02 10:22:56 +05:30
parent ca96cde0d1
commit c438daa190
1 changed files with 7 additions and 2 deletions

View File

@ -1915,10 +1915,14 @@ With PREFIX argument and CMD not supplied - prompt for command."
(interactive)
(my-compile-project "Makefile" prefix "make -Bk tangle compile"))
(defhydra my-literate-elisp-hydra (:color blue)
"Literate Elisp"
("l" (literate-elisp-load (buffer-file-name)) "load")
("b" (literate-elisp-byte-compile-file (buffer-file-name)) "byte-compile"))
(my-defhydra my-org-hydra (:color blue)
"Org"
("L" (literate-elisp-load (buffer-file-name)) "literate-elisp-load")
("L" my-literate-elisp-hydra/body "literate-elisp")
("p" org-set-property "property")
("l" my-org-hydra-block/body "source block")
("t" my-org-hydra-set-tags "tags")
@ -2046,7 +2050,8 @@ With PREFIX argument and CMD not supplied - prompt for command."
#+BEGIN_SRC emacs-lisp
(defhydra my-cl-hydra-eval (:color blue)
("b" slime-eval-buffer "buffer")
("e" slime-eval-defun "defun"))
("e" slime-eval-defun "defun")
("l" slime-eval-last-expression "last expression"))
#+END_SRC
*** help
#+BEGIN_SRC emacs-lisp