Further shell quoting for space characters.

diff --git a/src/lib/platform.slate b/src/lib/platform.slate
index 1630648..e92b42d 100644 (file)
--- a/src/lib/platform.slate
+++ b/src/lib/platform.slate
@@ -46,7 +46,7 @@ s@(String traits) escapeForShell
 [
   [| :result |
    s do: [| :char |
-     (';<>*|`&$!#()[]{}:\\\'"' includes: char) ifTrue: [result nextPut: $\\].
+     (';<>*|`&$!#()[]{}: \\\'"' includes: char) ifTrue: [result nextPut: $\\].
      result nextPut: char
    ]] writingAs: s
 ].