From c3e137c08a43d5c6564819e93d427b813896b08b Mon Sep 17 00:00:00 2001
From: Doug Coleman <doug.coleman@gmail.com>
Date: Sun, 24 Sep 2017 13:12:49 -0500
Subject: [PATCH] escape-strings: Fix syntax.
---
basis/escape-strings/escape-strings.factor | 2 +-
1 file changed, 1 insertion(+), 1 deletion(-)
diff --git a/basis/escape-strings/escape-strings.factor b/basis/escape-strings/escape-strings.factor
index 1140100dbf..c15d84c9d6 100644
--- a/basis/escape-strings/escape-strings.factor
+++ b/basis/escape-strings/escape-strings.factor
@@ -8,7 +8,7 @@ IN: escape-strings
[ f f f ] dip [
{
{ char: = [ [ dup [ 1 + ] when ] bi@ ] }
- { char: ] [ [ [ 0 or ] 2dip [ max ] curry dip ] when* 0 ] }
+ { char: \] [ [ [ 0 or ] 2dip [ max ] curry dip ] when* 0 ] }
[ 2drop f ]
} case
] each 2drop ;