mirror of
https://github.com/urbit/shrub.git
synced 2024-12-02 08:55:07 +03:00
20 lines
276 B
Plaintext
20 lines
276 B
Plaintext
::
|
|
:::: /hoon/time/app
|
|
::
|
|
/? 310
|
|
|%
|
|
++ card {$wait wire @da}
|
|
--
|
|
|_ {bowl $~}
|
|
++ poke-noun
|
|
|= *
|
|
:_ +>.$ :_ ~
|
|
[ost %wait /(scot %da now) +(now)]
|
|
::
|
|
++ wake
|
|
|= {wir/wire $~}
|
|
?> ?=({@ $~} wir)
|
|
~& [%took `@dr`(sub now (slav %da i.wir))]
|
|
[~ +>.$]
|
|
--
|