urbit/try/bin/sleep.hoon

12 lines
193 B
Plaintext
Raw Normal View History

2013-09-29 00:21:18 +04:00
!:
2013-10-16 01:02:23 +04:00
=> .(+ =>(+ ^/=main=/lib/pony))
2013-09-29 00:21:18 +04:00
|= [est=@da *]
|= [sle=@dr ~]
^- bowl
2013-10-16 01:02:23 +04:00
%+ pomp "sleeping for {(scow %dr sle)}..."
%- (posh (add est sle))
2013-09-29 00:21:18 +04:00
|= now=@da
:_ ~
:~ [%la %leaf "slept."]
==