[hydra] make hydra for literate-elisp
This commit is contained in:
parent
ca96cde0d1
commit
c438daa190
9
init.org
9
init.org
|
@ -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
|
||||
|
|
Loading…
Reference in New Issue