mirror of
https://github.com/doomemacs/doomemacs
synced 2025-08-01 12:17:25 -05:00
Rename non-interactive function +kotlin-locate-gradlew-file
This commit is contained in:
@ -1,7 +1,7 @@
|
|||||||
;;; lang/kotlin/autoload.el -*- lexical-binding: t; -*-
|
;;; lang/kotlin/autoload.el -*- lexical-binding: t; -*-
|
||||||
|
|
||||||
;;;autoload
|
;;;autoload
|
||||||
(defun +kotlin/locate-gradlew-file ()
|
(defun +kotlin-locate-gradlew-file ()
|
||||||
"Gradlew file location for this project."
|
"Gradlew file location for this project."
|
||||||
(locate-dominating-file buffer-file-name "gradlew"))
|
(locate-dominating-file buffer-file-name "gradlew"))
|
||||||
|
|
||||||
@ -9,7 +9,7 @@
|
|||||||
(defun +kotlin/run-gradlew (command)
|
(defun +kotlin/run-gradlew (command)
|
||||||
"Run gradlew in this project."
|
"Run gradlew in this project."
|
||||||
(interactive "sCommand: ")
|
(interactive "sCommand: ")
|
||||||
(let ((default-directory (+kotlin/locate-gradlew-file))
|
(let ((default-directory (+kotlin-locate-gradlew-file))
|
||||||
(compilation-read-command nil)
|
(compilation-read-command nil)
|
||||||
(compile-command (format "sh gradlew %s" command)))
|
(compile-command (format "sh gradlew %s" command)))
|
||||||
(call-interactively #'compile)))
|
(call-interactively #'compile)))
|
||||||
|
Reference in New Issue
Block a user