diff --git a/contrib/textmate/textmate.factor b/contrib/textmate/textmate.factor
index 365374a6bc..5dbf836f86 100644
--- a/contrib/textmate/textmate.factor
+++ b/contrib/textmate/textmate.factor
@@ -1,8 +1,8 @@
-USING: definitions kernel parser process namespaces ;
+USING: definitions kernel parser process namespaces prettyprint ;
 
 IN: textmate
 
 : textmate-location ( file line -- )
-    [ "mate -a \"" % over % "\" -l " % # ] "" make run-process ;
+    [ "mate -a -l " % # " " % unparse % ] "" make run-process ;
 
-[ textmate-location ] edit-hook set-global
\ No newline at end of file
+[ textmate-location ] edit-hook set-global