tools.test: Make the flag public. Finish porting tester changes to fuzzer.

[factor.git] / unmaintained / dns / cache / rr / rr.factor

diff --git a/unmaintained/dns/cache/rr/rr.factor b/unmaintained/dns/cache/rr/rr.factor
index cb8019045226652de07a2ca32855f3dc65280faa..e2ce5239d1a27f893c22eebcc23ad0df8496994f 100644 (file)
--- a/unmaintained/dns/cache/rr/rr.factor
+++ b/unmaintained/dns/cache/rr/rr.factor
@@ -1,6 +1,6 @@
 
 USING: kernel sequences assocs sets locals combinators
-       accessors system math math.functions unicode.case prettyprint
+       accessors system math math.functions unicode prettyprint
        combinators.smart dns ;
 
 IN: dns.cache.rr
@@ -59,7 +59,7 @@ TUPLE: <entry> time data ;
      {
        { [ ENT f =      ] [ T{ <entry> f TIME V{ RDATA } } RR cache-set-at ] }
        { [ ENT expired? ] [ RR cache-delete RR cache-add                   ] }
-       { [ t            ] [ TIME ENT (>>time) RDATA ENT data>> adjoin      ] }
+       { [ t            ] [ TIME ENT time<< RDATA ENT data>> adjoin      ] }
      }
      cond
-   ] ;
\ No newline at end of file
+   ] ;