adds error message to +ticket

2024-11-15 02:48:06 +03:00 · 2017-06-20 11:59:50 -04:00 · 2017-06-20 11:59:50 -04:00 · 2542a3ee80
commit 2542a3ee80
parent 43bb99b61b
1 changed files with 3 additions and 1 deletions
--- a/gen/ticket.hoon
+++ b/gen/ticket.hoon
@ -5,10 +5,12 @@
 /?    310
 ::
 ::::
-  !:
+  !.
 :-  %say
 |=  $:  {now/@da eny/@uvJ bec/beak}
        {{her/@p $~} $~}
    ==
 :-  %noun
+~_  leaf+"can't ticket {<her>} (not a child of {<p.bec>})"
+?>  =(p.bec (sein her))
 .^(@p /a/(scot %p p.bec)/tick/(scot %da now)/(scot %p her))