Fix launchers

extra/io/unix/launcher/launcher.factor

@@ -70,7 +70,7 @@ USE: unix
     [
         setup-priority
         setup-redirection
-        current-directory get cd
+        current-directory get resource-path cd
         dup pass-environment? [
             dup get-environment set-os-envs
         ] when

extra/io/windows/launcher/launcher.factor

@@ -23,12 +23,12 @@ TUPLE: CreateProcess-args
 
 : default-CreateProcess-args ( -- obj )
     CreateProcess-args construct-empty
-    0 >>dwCreateFlags
     "STARTUPINFO" <c-object>
     "STARTUPINFO" heap-size over set-STARTUPINFO-cb >>lpStartupInfo
     "PROCESS_INFORMATION" <c-object> >>lpProcessInformation
     TRUE >>bInheritHandles
-    current-directory get >>lpCurrentDirectory ;
+    0 >>dwCreateFlags
+    current-directory get normalize-pathname >>lpCurrentDirectory ;
 
 : call-CreateProcess ( CreateProcess-args -- )
     {