push-hook: add %kick poke

pkg/arvo/gen/kick.hoon

@@ -0,0 +1,7 @@
+::  Kick subs
+:-  %say
+|=  $:  [now=@da eny=@uvJ bec=beak]
+        ~
+        ~
+    ==
+[%kick %kick]

pkg/arvo/lib/push-hook.hoon

@@ -271,6 +271,10 @@
       ~/  %on-poke
       |=  [=mark =vase]
       ^-  (quip card:agent:gall agent:gall)
+      ?:  =(mark %kick)
+        ?>  (team:title [our src]:bowl)
+        :_  this
+        (kick:io (turn ~(val by sup.bowl) tail))^~
       ?:  =(mark %push-hook-action)
         ?>  (team:title our.bowl src.bowl)
         =^  cards  state