lang/emacs-lisp: add buttercup-run-project command
And replace non-interactive buttercup-run-discover.
This commit is contained in:
parent
49afaa8bd1
commit
7c6e871035
2 changed files with 11 additions and 1 deletions
|
@ -114,6 +114,16 @@ if it's callable, `apropos' otherwise."
|
||||||
(buttercup-run))
|
(buttercup-run))
|
||||||
(message "File executed successfully")))
|
(message "File executed successfully")))
|
||||||
|
|
||||||
|
;;;###autoload
|
||||||
|
(defun +emacs-lisp/buttercup-run-project ()
|
||||||
|
"Run all buttercup tests in the project."
|
||||||
|
(interactive)
|
||||||
|
(let* ((default-directory (doom-project-root))
|
||||||
|
(load-path (append (list (doom-path "test")
|
||||||
|
default-directory)
|
||||||
|
load-path)))
|
||||||
|
(buttercup-run-discover)))
|
||||||
|
|
||||||
|
|
||||||
;;
|
;;
|
||||||
;;; Hooks
|
;;; Hooks
|
||||||
|
|
|
@ -133,7 +133,7 @@ This marks a foldable marker for `outline-minor-mode' in elisp buffers.")
|
||||||
:localleader
|
:localleader
|
||||||
:prefix "t"
|
:prefix "t"
|
||||||
"t" #'+emacs-lisp/buttercup-run-file
|
"t" #'+emacs-lisp/buttercup-run-file
|
||||||
"a" #'buttercup-run-discover
|
"a" #'+emacs-lisp/buttercup-run-project
|
||||||
"s" #'buttercup-run-at-point))
|
"s" #'buttercup-run-at-point))
|
||||||
|
|
||||||
|
|
||||||
|
|
Loading…
Add table
Add a link
Reference in a new issue