From cf80591ecbfa3181fe7b10fb49fb2a7f434ede9d Mon Sep 17 00:00:00 2001
From: Doug Coleman <doug.coleman@gmail.com>
Date: Mon, 20 Jun 2016 14:33:24 -0700
Subject: [PATCH] io.launcher.windows: escape char.

---
 language/io/launcher/windows/windows.factor | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/language/io/launcher/windows/windows.factor b/language/io/launcher/windows/windows.factor
index 6131ad6b89..8ea1e7615d 100755
--- a/language/io/launcher/windows/windows.factor
+++ b/language/io/launcher/windows/windows.factor
@@ -64,7 +64,7 @@ TUPLE: CreateProcess-args
     [
         { [ drop char: \ = ] [ nip "\\\"" member? ] } 2&&
     ] monotonic-split [
-        dup last char: " = [
+        dup last char: \" = [
             dup length 1 > [
                 ! String of backslashes + double-quote
                 length 1 - 2 * char: \ <repetition> "\\\"" append