mirror of
https://github.com/ilyakooo0/urbit.git
synced 2024-12-15 10:02:47 +03:00
:begin ~ship ~ticket form
This commit is contained in:
parent
7e50755029
commit
cde3031388
@ -4,7 +4,7 @@
|
||||
=> .(-< `who=@p`-<)
|
||||
=> .(+ =>(+ ^/===/lib/pony))
|
||||
|= [est=time *]
|
||||
|= arg=$|(~ [p=@p ~])
|
||||
|= arg=$|(~ [p=@p q=$|(~ [p=@p ~])])
|
||||
=- ^- bowl
|
||||
?^ arg (fud p.arg)
|
||||
%+ pomp ""
|
||||
@ -65,8 +65,10 @@
|
||||
%+ pomp ""
|
||||
%+ pomp " -- Bunting, _Chomei at Toyama_"
|
||||
%+ pogo (pond ^:@/===doc%/warning/txt)
|
||||
%+ (polo %text "Your ticket: ~" ~ ~)
|
||||
fed:ag
|
||||
=- ?: ?=([@ @ ~] arg)
|
||||
(- ~ p.q.arg)
|
||||
%+ (polo %text "Your ticket: ~" ~ ~)
|
||||
fed:ag -
|
||||
|= [* tic=@p]
|
||||
%+ pogo (pond ^:@/===doc%/entropy/txt)
|
||||
%+ (polo %pass "Entropy: " ~ ~)
|
||||
|
Loading…
Reference in New Issue
Block a user