[hydra] add byte-compile hydra
This commit is contained in:
parent
795527eff7
commit
c016ef5021
21
init.org
21
init.org
|
@ -1358,6 +1358,9 @@ Add these common operations to the hydra -
|
|||
#+BEGIN_SRC emacs-lisp
|
||||
(use-package hydra :commands defhydra)
|
||||
|
||||
#+END_SRC
|
||||
*** common hydra heads
|
||||
#+BEGIN_SRC emacs-lisp
|
||||
(defvar my-hydra-common-heads
|
||||
'(("0" delete-window "delete this" :color red)
|
||||
("1" delete-other-windows "delete others" :color red)
|
||||
|
@ -1365,6 +1368,7 @@ Add these common operations to the hydra -
|
|||
("3" split-window-right "split right" :color red)
|
||||
("a" my-app-hydra/body "applications")
|
||||
("z" my-app-hydra/body "applications")
|
||||
("b" compile "compile")
|
||||
("C" contrapunctus-mc-hydra/body "multiple cursors")
|
||||
("d" dired-jump "dired-jump")
|
||||
("D" (cp-insert-timestamp t) "date")
|
||||
|
@ -1505,10 +1509,10 @@ _u_: next word ^_l_: edit lines^ _s_: next whole symbol
|
|||
(my-defhydra my-org-hydra (:color blue)
|
||||
"Org"
|
||||
("p" org-set-property "property")
|
||||
("b" my-org-hydra-block/body "source block")
|
||||
("l" my-org-hydra-block/body "source block")
|
||||
("t" my-org-hydra-set-tags "tags")
|
||||
("n" my-org-hydra-nav/body "navigation")
|
||||
("B" contrapunctus-async-tangle "babel-tangle")
|
||||
("C-b" contrapunctus-async-tangle "babel-tangle")
|
||||
|
||||
("E" toggle-debug-on-error "tdoe")
|
||||
("Q" toggle-debug-on-quit "tdoq"))
|
||||
|
@ -1561,7 +1565,8 @@ _u_: next word ^_l_: edit lines^ _s_: next whole symbol
|
|||
#+BEGIN_SRC emacs-lisp
|
||||
(my-defhydra my-elisp-hydra (:color blue)
|
||||
"Emacs Lisp"
|
||||
("B" contrapunctus-async-tangle "babel-tangle")
|
||||
("c" my-elisp-bytecomp-hydra/body "byte compile")
|
||||
("C-b" contrapunctus-async-tangle "babel-tangle")
|
||||
("e" my-elisp-hydra-eval/body "Eval")
|
||||
("E" my-elisp-hydra-debug/body "Debug")
|
||||
("j" xref-find-definitions "Jump to definition")
|
||||
|
@ -1590,6 +1595,16 @@ _u_: next word ^_l_: edit lines^ _s_: next whole symbol
|
|||
("o" toggle-debug-on-error "tdoe")
|
||||
("u" toggle-debug-on-quit "tdoq"))
|
||||
#+END_SRC
|
||||
**** byte-compile
|
||||
#+BEGIN_SRC emacs-lisp
|
||||
(defhydra my-elisp-bytecomp-hydra (:color blue)
|
||||
"Byte compile"
|
||||
("d" byte-recompile-directory "directory")
|
||||
("c" byte-compile-file "file")
|
||||
("r" byte-recompile-file "recompile")
|
||||
("R" byte-force-recompile "force recompile"))
|
||||
#+END_SRC
|
||||
|
||||
*** Common Lisp
|
||||
#+BEGIN_SRC emacs-lisp
|
||||
(my-defhydra my-cl-hydra (:color blue)
|
||||
|
|
Loading…
Reference in New Issue