trivial change in regexp

2009-02-20 18:45:24 -06:00 · 2009-02-20 18:45:24 -06:00 · 041be23cdc
parent e41cdf5e8f
commit 041be23cdc
1 changed files with 1 additions and 1 deletions
--- a/basis/regexp/parser/parser.factor
+++ b/basis/regexp/parser/parser.factor
@ -83,7 +83,7 @@ ERROR: bad-class name ;
 : options>string ( options -- string )
    [ on>> ] [ off>> ] bi
    [ [ option>ch ] map ] bi@
-    [ "-" swap 3append ] unless-empty
+    [ "-" glue ] unless-empty
    "" like ;

 ! TODO: add syntax for various parenthized things,