branch: elpa/swift-mode
commit f62cd5844557f2df2279c8cd587dbfd28dc92887
Author: taku0 <mxxouy6x3m_git...@tatapa.org>
Commit: taku0 <mxxouy6x3m_git...@tatapa.org>
Change standard values for executables
---
swift-mode-repl.el | 12 ++++++------
1 file changed, 6 insertions(+), 6 deletions(-)
diff --git a/swift-mode-repl.el b/swift-mode-repl.el
index 9f0c2db..6b700f7 100644
--- a/swift-mode-repl.el
+++ b/swift-mode-repl.el
@@ -47,7 +47,7 @@
;;;###autoload
(defcustom swift-mode:repl-executable
- "xcrun swift"
+ (concat (when (executable-find "xcrun") "xcrun ") "swift")
"Path to the Swift CLI. The string is split by spaces, then unquoted."
:type '(choice string (list string))
:group 'swift-mode:repl
@@ -55,7 +55,7 @@
;;;###autoload
(defcustom swift-mode:swift-package-executable
- "xcrun swift package"
+ (concat (when (executable-find "xcrun") "xcrun ") "swift package")
"Path to the Swift command for package manipulation.
The string is split by spaces, then unquoted."
:type '(choice string (list string))
@@ -64,7 +64,7 @@ The string is split by spaces, then unquoted."
;;;###autoload
(defcustom swift-mode:swift-build-executable
- "xcrun swift build"
+ (concat (when (executable-find "xcrun") "xcrun ") "swift build")
"Path to the Swift command for building.
The string is split by spaces, then unquoted."
:type '(choice string (list string))
@@ -73,7 +73,7 @@ The string is split by spaces, then unquoted."
;;;###autoload
(defcustom swift-mode:debugger-executable
- "xcrun lldb"
+ (concat (when (executable-find "xcrun") "xcrun ") "lldb")
"Path to the debugger command.
The string is split by spaces, then unquoted."
:type '(choice string (list string))
@@ -91,7 +91,7 @@ The string is split by spaces, then unquoted."
;;;###autoload
(defcustom swift-mode:simulator-controller-executable
- "xcrun simctl"
+ (concat (when (executable-find "xcrun") "xcrun ") "simctl")
"Path to the simulator controller command.
The string is split by spaces, then unquoted."
:type '(choice string (list string))
@@ -100,7 +100,7 @@ The string is split by spaces, then unquoted."
;;;###autoload
(defcustom swift-mode:xcodebuild-executable
- "xcrun xcodebuild"
+ (concat (when (executable-find "xcrun") "xcrun ") "xcodebuild")
"Path to the Xcode builder.
The string is split by spaces, then unquoted."
:type '(choice string (list string))
