From 169cb88b8ec774868ce8befbc0ccb2be6a91aa73 Mon Sep 17 00:00:00 2001
From: Eduardo Julian
Date: Tue, 4 Dec 2018 20:27:33 -0400
Subject: Restored the "encode" function for duration, to correct for overkill
 when removing contributor code.

---
 stdlib/test/test/lux/data/format/json.lux | 11 ++++++-----
 1 file changed, 6 insertions(+), 5 deletions(-)

(limited to 'stdlib/test')

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))
            ))))
-- 
cgit v1.2.3