12 lines
431 B
Diff
12 lines
431 B
Diff
|
--- a/lib/gauche/interactive/toplevel.scm
|
||
|
|
+++ b/lib/gauche/interactive/toplevel.scm
|
||
|
|
@@ -331,7 +331,7 @@
|
||
|
|
(run-process `("cmd.exe" "/c" ,sh "-c" ,line) :wait #t)
|
||
|
|
(run-process `("cmd.exe" "/c" ,line) :wait #t))]
|
||
|
|
[else
|
||
|
|
- (let1 sh (or (sys-getenv "SHELL") "/bin/sh")
|
||
|
|
+ (let1 sh (or (sys-getenv "SHELL") "@TERMUX_PREFIX@/bin/sh")
|
||
|
|
(run-process `(,sh "-c" ,line) :wait #t))])
|
||
|
|
*no-value*))
|
||
|
|
|