mirror of
https://github.com/urbit/shrub.git
synced 2024-11-28 13:54:20 +03:00
pull-hook: fix handle-kick printouts
This commit is contained in:
parent
44e0f409bb
commit
c5a46bc605
@ -339,6 +339,7 @@
|
||||
==
|
||||
~
|
||||
``.^(* u.pax)
|
||||
::
|
||||
++ handle-kick
|
||||
|= [rid=resource =ship]
|
||||
^- (quip card _state)
|
||||
@ -349,13 +350,16 @@
|
||||
:- -:!>(*(unit path))
|
||||
?:(?=(%0 -.res) p.res ~)
|
||||
=? failed-kicks !?=(%0 -.res)
|
||||
=/ tang
|
||||
=/ =tang
|
||||
:+ leaf+"failed kick handler, please report"
|
||||
leaf+"{<rid>} in {(trip dap.bowl)}"
|
||||
?: ?=(%2 -.res)
|
||||
p.res
|
||||
?> ?=(%1 -.res)
|
||||
(turn `(list *)`p.res (cork path smyt))
|
||||
=/ paths=(unit (list path)) ((soft (list path)) p.res)
|
||||
?~ paths ~
|
||||
%+ turn u.paths
|
||||
(cork path smyt)
|
||||
%- (slog tang)
|
||||
(~(put by failed-kicks) rid ship)
|
||||
?^ pax
|
||||
|
Loading…
Reference in New Issue
Block a user