bash tool: pass cwd via dir: keyword, not positionally

ober

7b23e7a4df18c1786ac46521c60cf4c411602177

diff --git a/src/jcode/tool/bash.ss b/src/jcode/tool/bash.ss
index 12542bb..c30e30c 100644
--- a/src/jcode/tool/bash.ss
+++ b/src/jcode/tool/bash.ss
@@ -63,7 +63,7 @@
   ;; lifetime.
   (let ((cmd (sandbox-wrap-command command cwd)))
     (try
-      (let-values (((stdout stderr exit-code) (aproc-run/status cmd cwd)))
+      (let-values (((stdout stderr exit-code) (aproc-run/status cmd dir: cwd)))
         (format-result stdout stderr exit-code))
       (catch (e)
         (format "Error: ~a" (err->string e))))))