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

Compare commits

base: jdormit:911b009ee9e68e6cb4a8bf7e23fcd9de17ae8bf8
Branches Tags
jdormit:master
..
compare: jdormit:9cbad56375376251b1556d7e839c2d07db3dbab0
Branches Tags
jdormit:master

No commits in common. "911b009ee9e68e6cb4a8bf7e23fcd9de17ae8bf8" and "9cbad56375376251b1556d7e839c2d07db3dbab0" have entirely different histories.
911b009ee9 ... 9cbad56375

1 changed files with 17 additions and 19 deletions
Show Stats Expand all files Collapse all files

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

@ -293,18 +293,18 @@
;; (format "%s#%s" test-class method))))
(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)))))
: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")
@ -451,13 +451,11 @@
(let* ((project (projectile-project-root))
(project-name (f-filename project)))
(append (when (equal project-name "hummingbird-rails")
(->> (f-files (f-join project "workbench" "bin"))
(-filter (lambda (f) (not (s-starts-with? "_" (f-base f)))))
(-map (lambda (f)
(list :command-name (format "workbench %s" (f-base f))
:command-line f
:working-dir project
:runner 'run-command-runner-vterm))))))))
(list
(list :command-name "workbench start"
:command-line "./workbench/bin/start"
:working-dir project
:runner 'run-command-runner-vterm))))))
:general
(leader-map "\"" #'run-command)