diff --git a/src/babashka/process.cljc b/src/babashka/process.cljc
index d2795a0..0ff4c4d 100644
--- a/src/babashka/process.cljc
+++ b/src/babashka/process.cljc
@@ -193,8 +193,9 @@
                       (fs/which program) ;; to resolve any extensions
 
                       (fs/parent program)
-                      (fs/which (fs/file (or dir (fs/cwd))
-                                         program))
+                      (if dir
+                        (fs/which (fs/file dir program))
+                        (fs/which program))
 
                       :else
                       (fs/which program))]