Restored the "encode" function for duration, to correct for overkill when removing contributor code.

1 files changed, 6 insertions, 5 deletions

diff --git a/stdlib/test/test/lux/data/format/json.lux b/stdlib/test/test/lux/data/format/json.lux
index dc30d54d7..0f905a844 100644
--- a/stdlib/test/test/lux/data/format/json.lux
+++ b/stdlib/test/test/lux/data/format/json.lux
@@ -30,13 +30,14 @@
    [time
     ["ti" instant]
     ["tda" date]
-    ["tdu" duration]]
+    ## ["tdu" duration]
+    ]
    test]
   [test
    [lux
     [time
      ["_." instant]
-     ["_." duration]
+     ## ["_." duration]
      ["_." date]]]]
   )
 
@@ -93,7 +94,7 @@
    ## #tuple [Bit Frac Text]
    #recursive Recursive
    ## #instant ti.Instant
-   #duration tdu.Duration
+   ## #duration tdu.Duration
    #date tda.Date
    #grams (unit.Qty unit.Gram)
    })
@@ -125,7 +126,7 @@
         ## ($_ r.and r.bit r.frac (r.unicode size))
         gen-recursive
         ## _instant.instant
-        _duration.duration
+        ## _duration.duration
         _date.date
         qty
         )))
@@ -161,7 +162,7 @@
            ##        (:: text.Equivalence<Text> = tL2 tR2)))
            (:: Equivalence<Recursive> = (get@ #recursive recL) (get@ #recursive recR))
            ## (:: ti.Equivalence<Instant> = (get@ #instant recL) (get@ #instant recR))
-           (:: tdu.Equivalence<Duration> = (get@ #duration recL) (get@ #duration recR))
+           ## (:: tdu.Equivalence<Duration> = (get@ #duration recL) (get@ #duration recR))
            (:: tda.Equivalence<Date> = (get@ #date recL) (get@ #date recR))
            (:: unit.Equivalence<Unit> = (get@ #grams recL) (get@ #grams recR))
            ))))