chat, publish, contacts: fix OTA bugs

pkg/arvo/app/chat-store.hoon

@@ -64,7 +64,7 @@
       =?  cards  ?=(^ kick-paths)
         :_  cards
         [%give %kick kick-paths ~]
-      $(old [%3 inbox.old])
+      $(old [%3 inbox])
     ::
       ?(%0 %1)  $(old (old-to-2 inbox.old))
     ::

pkg/arvo/app/contact-hook.hoon

@@ -68,12 +68,13 @@
         ::
           cards
         ^-  (list card)
-        %+  welp
+        ;:  welp
           :~  [%pass /group %agent [our.bol %group-store] %leave ~]
               [%pass /group %agent [our.bol %group-store] %watch /groups]
-              kick-old-subs
           ==
-        cards
+          kick-old-subs
+          cards
+        ==
       ==
     %_    $
       -.old  %1
@@ -87,7 +88,8 @@
         %+  turn
           ~(val by sup.bol)
         |=([=ship =path] path)
-      [%give %kick paths ~]
+      ?~  paths  ~
+      [%give %kick paths ~]~
     --
   ::
   ++  on-poke

pkg/arvo/app/contact-store.hoon

@@ -67,11 +67,12 @@
         old  [%2 new-rolodex]
         ::
           cards
-        :_  cards
         =/  paths
           %+  turn
             ~(val by sup.bol)
           |=([=ship =path] path)
+        ?~  paths  cards
+        :_  cards
         [%give %kick paths ~]
       ==
 

pkg/arvo/app/publish.hoon

@@ -230,6 +230,15 @@
         ?:  =('~' i.writers.prev)
           t.writers.prev
         writers.prev
+      ::
+          subscribers
+        ?>  ?=(^ subscribers.prev)
+        :-  %ship
+        %+  scag  2
+        ?:  =('~' i.subscribers.prev)
+          t.subscribers.prev
+        subscribers.prev
+
       ==
     ::
     ++  convert-comment-2-3