Merge pull request #7008 from urbit/develop

Release 411k-2

pkg/arvo/app/ping.hoon

@@ -141,6 +141,9 @@
   ?.  =(our src):bowl    :: don't crash, this is where pings are handled
     `this
   ::
+  ?:  ?=(%czar (clan:title our.bowl))
+    `this
+  ::
   =^  cards  state
     ?:  ?=([%kick ?] q.vase)
       =?  mode.state  =(+.q.vase %.y)
@@ -182,6 +185,8 @@
   =^  cards  state
     ?+    wire  `state
         [%wait *]
+      ?:  ?=(%czar (clan:title our.bowl))
+        `state
       ?.  ?=(%formal mode.state)  `state
       ?>  ?=(%wake +<.sign-arvo)
       ?^  error.sign-arvo

pkg/arvo/gen/commit-event.hoon

@@ -0,0 +1,16 @@
+::  make a unix commit event
+::
+::    call as > .event/jam +commit-event /path/to/file
+::    to be used with ./urbit-binary -I event.jam pier
+::
+::    XX expand with arbitrary user-defined events?
+::    XX only supports files in which +noun:grab in the mark file returns a @t
+::       (e.g. hoon files)
+::
+:-  %say
+|=  [[now=@da eny=@uvJ bec=beak] [=path ~] ~]
+:-  %noun
+?~  beam=(de-beam path)
+  ~|(%path-not-beam !!)
+=+  .^(file=@t %cx path)
+[/c/sync %info desk=q.u.beam & [s.u.beam %ins %mime !>([/ (as-octs:mimes:html file)])]~]

pkg/arvo/lib/verb

@@ -0,0 +1 @@
+../../base-dev/lib/verb

pkg/arvo/mar/verb

@@ -0,0 +1 @@
+../../base-dev/mar/verb

pkg/arvo/sys/vane/ames.hoon

@@ -2768,7 +2768,10 @@
         ?~  bone=(bone-ok u.parsed wire rift.peer-state.peer-core)
           event-core
         ::
-        abet:(check-clog:(on-memo:peer-core u.bone [%boon payload]) u.bone id)
+        =.  peer-core  (on-memo:peer-core u.bone [%boon payload])
+        =?  peer-core  (gte now (add ~s30 last-contact.qos.peer-state.peer-core))
+          (check-clog:peer-core u.bone id)
+        abet:peer-core
       ::  +on-take-boon: receive request to give message to peer
       ::
       ++  on-take-boon