added invite functionality to collections

app/collections.hoon

@@ -139,7 +139,7 @@
   |=  cod=command
   ^-  (quip move _this)
   ?-    -.cod
-      %invite
+      %chat-invite
     :_  this
     :-  :*  ost.bol
             %poke
@@ -163,6 +163,31 @@
         aud=(sy [guy %i] ~)
         ses=[%inv & our.bol nom.cod]~
     ==
+    ::  
+      %collection-invite
+    :_  this
+    :-  :*  ost.bol
+            %poke
+            /permit
+            [our.bol %hall]
+            %hall-action
+            %permit
+            nom.cod
+            %.y
+            who.cod
+        ==
+    %+  turn  ~(tap in who.cod)
+    |=  guy=@p
+    ^-  move
+    :*  ost.bol
+        %poke
+        /invite
+        [our.bol %hall]
+        %hall-action
+        %phrase
+        aud=(sy [guy %i] ~)
+        ses=[%app col.cod [%inv & our.bol nom.cod]]~
+    ==
   ==
 ::
 ::  +peer:
@@ -206,11 +231,8 @@
 ::  +quit:
 ::
 ++  quit
-  |=  [wir=wire err=(unit tang)]
+  |=  wir=wire
   ^-  (quip move _this)
-  ::~&  quit+[wir =(~ err)]
-  ?~  err
-    [~ this]
   ?~  wir
     (mean [leaf+"invalid wire for diff: {(spud wir)}"]~)
   ?+  i.wir

lib/collections.hoon

@@ -81,7 +81,8 @@
   ==
 ::
 +$  command
-  $%  [%invite nom=name:hall who=(set ship)]
+  $%  [%chat-invite nom=name:hall who=(set ship)]
+      [%collection-invite nom=name:hall col=term who=(set ship)]
   ==
 +$  collection  [meta=config data=(map nom=knot =item)]
 ::