urbit/base/fap/ls/core.hook

18 lines
263 B
Plaintext
Raw Normal View History

2015-01-12 04:13:34 +03:00
:: LiSt directory subnodes
::
::::
::
/+ sh-utils
// /%%/subdir
2014-09-25 04:37:29 +04:00
!:
2015-01-12 04:13:34 +03:00
::::
::
2014-09-25 04:37:29 +04:00
|_ [hid=hide ~]
2015-01-10 05:21:25 +03:00
++ peer ,_`.
2014-09-25 04:37:29 +04:00
++ poke-ls-args
%+ args-into-gate .
|= [arg=path ~]
2014-09-25 04:37:29 +04:00
=+ lon=((hard arch) .^(%cy arg))
tang/[?~(r.lon leaf/"~" (subdir arg r.lon))]~
2014-09-25 04:37:29 +04:00
--