jdormit/dotfiles
1
0
Fork 0
Code Issues Pull Requests Projects Releases Wiki Activity

Delete maven run-command recipe

Browse Source 
Turns out it's more convenient to just set the
projectile-project-*-cmd variables since mvn invocations vary so
widely
This commit is contained in:
Jeremy Dormitzer 2022-05-06 16:58:11 -04:00
parent c021061dc5
commit 4ff1ef0001
1 changed files with 0 additions and 72 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

72
emacs/.emacs.d/config/init-run-command.el
View File

@ -215,77 +215,6 @@
(list :command-name "install"
:command-line (format "pip install -r %s" (buffer-file-name))))))
(defun run-command-recipe-maven ()
(when-let* ((root-dir (or (projectile-project-root) default-directory))
(local-pom-dir (locate-dominating-file default-directory "pom.xml"))
(project-dir (locate-dominating-file root-dir "pom.xml"))
(commands (list
(list :command-name "validate"
:command-line "mvn validate"
:working-dir local-pom-dir)
(list :command-name "compile"
:command-line "mvn compile"
:working-dir local-pom-dir)
(list :command-name "clean compile"
:command-line "mvn clean compile"
:working-dir local-pom-dir)
(list :command-name "test"
:command-line "mvn test -DfailIfNoTests=false"
:working-dir local-pom-dir)
(list :command-name "package"
:command-line "mvn package"
:working-dir local-pom-dir)
(list :command-name "verify"
:command-line "mvn verify"
:working-dir local-pom-dir)
(list :command-name "install"
:command-line "mvn install"
:working-dir local-pom-dir)
(list :command-name "install (skip tests)"
:command-line "mvn install -DskipTests"
:working-dir local-pom-dir)
(list :command-name "deploy"
:command-line "mvn deploy"
:working-dir local-pom-dir)
(list :command-name "clean"
:command-line "mvn clean"
:working-dir local-pom-dir)
(list :command-name "exec:java"
:command-line "mvn exec:java"
:working-dir local-pom-dir)
(list :command-name "clean compile exec:java"
:command-line "mvn clean compile exec:java"
:working-dir local-pom-dir)
(when-let ((test-class (and (buffer-file-name)
(let ((case-fold-search nil))
(string-match-p ".*\\(Test\\|IT\\).*\\.java$"
(buffer-file-name)))
(fboundp 'dap-java-test-class)
(dap-java-test-class))))
(list :command-name "test this class"
:command-line (format "mvn test -DfailIfNoTests=false -Dtest=%s" test-class)
:working-dir local-pom-dir))
(when-let ((test-method (and (buffer-file-name)
(let ((case-fold-search nil))
(string-match-p ".*\\(Test\\|IT\\).*\\.java$"
(buffer-file-name)))
(fboundp 'dap-java-test-method-at-point)
(dap-java-test-method-at-point t))))
(list :command-name "test this method"
:command-line (format "mvn test -DfailIfNoTests=false -Dtest=%s" test-method)
:working-dir local-pom-dir)))))
(if (s-equals? local-pom-dir project-dir)
commands
(-concat commands
(-map (lambda (cmd)
(when cmd
(-> (-copy cmd)
(plist-put :command-name
(format "%s (root POM)"
(plist-get cmd :command-name)))
(plist-put :working-dir project-dir))))
commands)))))
(defun get-cargo-commands (dir)
(when (executable-find "cargo")
(with-temp-buffer
@ -378,7 +307,6 @@
run-command-recipe-nosetests
run-command-recipe-web-ext
run-command-recipe-pip
run-command-recipe-maven
run-command-recipe-cargo
run-command-recipe-rake
run-command-recipe-scripts)))