txon: can just use replace instead of re-replace.

[factor.git] / extra / txon / txon.factor

diff --git a/extra/txon/txon.factor b/extra/txon/txon.factor
index 097ecb301455c52a1d1f5c40fdb148588a21c94e..8bfcd9a4533e5b9283274fd9ac3986999fe4b8f8 100644 (file)
--- a/extra/txon/txon.factor
+++ b/extra/txon/txon.factor
@@ -2,15 +2,15 @@
 ! See http://factorcode.org/license.txt for BSD license
 
 USING: assocs combinators combinators.short-circuit formatting
-grouping hashtables io kernel make math math.parser regexp
-sequences splitting strings unicode.categories ;
+grouping hashtables io kernel make math math.parser sequences
+splitting strings unicode.categories ;
 
 IN: txon
 
 <PRIVATE
 
 : decode-value ( string -- string' )
-    R" \\`" "`" re-replace ;
+    "\\`" "`" replace ;
 
 : `? ( ch1 ch2 -- ? )
     [ CHAR: \ = not ] [ CHAR: ` = ] bi* and ;
@@ -58,7 +58,7 @@ PRIVATE>
 <PRIVATE
 
 : encode-value ( string -- string' )
-    R" `" "\\`" re-replace ;
+    "`" "\\`" replace ;
 
 PRIVATE>