updated json endpoints in accordance with logan's requests

mar/collections.hoon

@@ -53,9 +53,13 @@
       ~(tap by cos)
     |=  [a=@da b=collection]
     :-  (scot %da a)
-    %-  frond
+    %-  pairs
+    :~
     :-  %description
     [%s desc.conf.b]
+    :-  %modified
+    [%s (scot %da mod.conf.b)]
+    ==
   --
 ::
 ++  grab

mar/collections/collection.hoon

@@ -65,15 +65,16 @@
                 [%s (scot %p a)]
             ==
             :-  %topics
-            %-  pairs
+            :-  %a
             %+  turn
               ~(tap by tops.col)
             |=  [e=@da f=topicful]
-            :-  (scot %da e)
             %-  pairs
             :~  title+[%s tit.info.f]
                 who+[%s (scot %p who.info.f)]
                 what+[%s (of-wain:format wat.info.f)]
+                id+[%s (scot %da e)]
+                modified+[%s (scot %da mod.info.f)]
             ==
         ==
   --

mar/collections/topic-full.hoon

@@ -114,14 +114,15 @@
         who+[%s (scot %p who.info.top)]
         what+[%s (of-wain:format wat.info.top)]
         :-  %comments
-        %-  pairs
+        :-  %a
         %+  turn
           ~(tap by coms.top)
         |=  [a=@da b=[c=@da d=comment]]
-        :-  (scot %da a)
         %-  pairs
         :~  who+[%s (scot %p who.d.b)]
             what+[%s (of-wain:format wat.d.b)]
+            id+[%s (scot %da a)]
+            modified+[%s (scot %da c.b)]
         ==
     ==
   --