urbit/main/bin/ls.hoon
2013-09-28 13:21:18 -07:00

14 lines
224 B
Plaintext

!:
:: /=main=/bin/ls/hoon
::
|= *
|= [pax=path ~]
:_ ~
^- (list gift)
=+ lon=((hard arch) .^(%cy pax))
?: =(~ r.lon) ~
:_ ~
:- %la
:+ %rose [" " "" ""]
(turn (~(tap by r.lon) ~) |=([a=@ta b=*] [%leaf (trip a)]))