[emacs-lisp] create unit test Hydra
This commit is contained in:
parent
3f25c80773
commit
c60c0a544a
6
init.org
6
init.org
|
@ -1729,6 +1729,10 @@ It'd be really cool to (recenter 3) when you /open/ a section, and (recenter) wh
|
||||||
("e" eval-defun "defun")
|
("e" eval-defun "defun")
|
||||||
("l" eval-last-sexp "last sexp"))
|
("l" eval-last-sexp "last sexp"))
|
||||||
|
|
||||||
|
(defhydra contrapunctus-el-test (:color blue)
|
||||||
|
("e" (cp/compile-project "Cask" "cask exec buttercup -L . --traceback pretty") "buttercup")
|
||||||
|
("r" ert "ert"))
|
||||||
|
|
||||||
(defhydra cp-el (:color blue)
|
(defhydra cp-el (:color blue)
|
||||||
"Emacs Lisp"
|
"Emacs Lisp"
|
||||||
("r" ielm "REPL")
|
("r" ielm "REPL")
|
||||||
|
@ -1738,7 +1742,7 @@ It'd be really cool to (recenter 3) when you /open/ a section, and (recenter) wh
|
||||||
("j" xref-find-definitions "Jump to definition")
|
("j" xref-find-definitions "Jump to definition")
|
||||||
("b" (cp/compile-project "Cask" "cask build") "Compile")
|
("b" (cp/compile-project "Cask" "cask build") "Compile")
|
||||||
("C" (cp/compile-project "Cask" "cask clean-elc") "clean")
|
("C" (cp/compile-project "Cask" "cask clean-elc") "clean")
|
||||||
("t" (cp/compile-project "Cask" "cask exec buttercup -L . --traceback pretty") "Test")
|
("t" (contrapunctus-el-test/body) "Test")
|
||||||
|
|
||||||
("i" (find-file "~/.emacs.d/init.org") "open init")
|
("i" (find-file "~/.emacs.d/init.org") "open init")
|
||||||
("d" dired-jump "dired-jump")
|
("d" dired-jump "dired-jump")
|
||||||
|
|
Loading…
Reference in New Issue