urbit/main/app/ls/core.hook

::  LiSt directory subnodes
::
::::
  ::
/+    sh-utils
//  /%%/subdir
!:
::::
  ::
|_  [hid=hide ~]
++  peer  ,_`.
++  poke-ls-args
  %+  args-into-gate  .
  |=  [arg=path ~]
  =+  lon=((hard arch) .^(%cy arg))
  tang/[?~(r.lon leaf/"~" (subdir arg r.lon))]~
--
Promoted sh-utils to proper /+ library 2015-01-12 04:13:34 +03:00			`:: LiSt directory subnodes`
			`::`
			`::::`
			`::`
			`/+ sh-utils`
Added tree traversal to les, cat; +tree 2015-01-10 02:21:28 +03:00			`// /%%/subdir`
first shell apps 2014-09-25 04:37:29 +04:00			`!:`
Promoted sh-utils to proper /+ library 2015-01-12 04:13:34 +03:00			`::::`
			`::`
first shell apps 2014-09-25 04:37:29 +04:00			`\|_ [hid=hide ~]`
refactored ++peer boilerplate 2015-01-10 05:21:25 +03:00			++ peer ,_`.
first shell apps 2014-09-25 04:37:29 +04:00			`++ poke-ls-args`
Factored out gate-class poke functionality 2015-01-10 04:28:17 +03:00			`%+ args-into-gate .`
			`\|= [arg=path ~]`
first shell apps 2014-09-25 04:37:29 +04:00			`=+ lon=((hard arch) .^(%cy arg))`
Factored out gate-class poke functionality 2015-01-10 04:28:17 +03:00			`tang/[?~(r.lon leaf/"~" (subdir arg r.lon))]~`
first shell apps 2014-09-25 04:37:29 +04:00			`--`