mirror of
https://github.com/urbit/shrub.git
synced 2024-12-14 11:08:45 +03:00
18 lines
293 B
Plaintext
18 lines
293 B
Plaintext
=, ^gall
|
|
|_ {bowl $~}
|
|
++ peek _~
|
|
++ peer-scry-x
|
|
|= path
|
|
:_ +>
|
|
[ost %diff [%json a+list-marks]]~
|
|
::
|
|
++ poke-noun
|
|
|= *
|
|
~& have+list-marks
|
|
`+>
|
|
::
|
|
++ list-marks
|
|
=+ .^(arch %cy /(scot %p our)/home/(scot %da now)/mar)
|
|
%+ turn (~(tap by dir))
|
|
|=({a/mark $~} [%s a])
|
|
-- |