Merge pull request #1175 from urbit/philip/clay-foreign

Clay cleanup
This commit is contained in:
Jared Tobin 2019-05-24 19:37:14 +08:00 committed by GitHub
commit 90e44afde4
No known key found for this signature in database
GPG Key ID: 4AEE18F83AFDEB23
7 changed files with 971 additions and 779 deletions

View File

@ -378,9 +378,12 @@
::
[%swap-files ~]
=. userspace-ova.pil
=/ slim-dirs
`(list path)`~[/app /gen /lib /mar /sur /hoon/sys /arvo/sys /zuse/sys]
:_ ~
%- unix-event
(file-ovum:pill-lib /(scot %p our.hid)/home/(scot %da now.hid))
%- %*(. file-ovum:pill-lib directories slim-dirs)
/(scot %p our.hid)/home/(scot %da now.hid)
=^ ms this (poke-pill pil)
(emit-moves ms)
::
@ -527,7 +530,6 @@
~
=/ who (slav %p i.pax)
=/ pier (~(get by piers) who)
=/ ren i.t.t.t.t.pax
?~ pier
~
:^ ~ ~ %noun

View File

@ -164,7 +164,9 @@
;< ~ bind:m (raw-ship ~bud `(dawn:eth-node ~bud))
;< ~ bind:m (raw-ship ~marbud `(dawn:eth-node ~marbud))
;< file=@t bind:m (touch-file ~bud %base)
~& %checking-file-touched
(check-file-touched ~marbud %home file)
~& %checked-file-touched
;< eth-node=_eth-node bind:m
(breach-and-hear:eth-node our.hid ~bud ~marbud)
;< [eth-node=_eth-node ~] bind:m

View File

@ -123,7 +123,7 @@
++ poke-track ::
|= hos/kiln-sync
?: (~(has by syn) hos)
abet:(spam (render "already syncing" [sud her syd]:hos) ~)
abet:(spam (render "already tracking" [sud her syd]:hos) ~)
abet:abet:start-track:(auto hos)
::
++ poke-sync ::
@ -457,7 +457,7 @@
q.p.mes
==
::
$no-ali-desk
$no-ali-disc
:~ (render "sync activated" sud her syd)
leaf+"note: blank desk {<sud>} on {<her>}"
==

View File

@ -48,6 +48,8 @@
:: bas: full path to / directory
::
++ file-ovum
=/ directories
`(list path)`~[/app /gen /lib /mar /ren /sec /sur /sys /tests /web]
|= bas=path
^- ovum
::
@ -62,7 +64,7 @@
:: /tests unit tests
:: /web %eyre web content
::
%. [/app /gen /lib /mar /ren /sec /sur /sys /tests /web ~]
%. directories
|= :: sal: all spurs to load from
::
sal/(list spur)

File diff suppressed because it is too large Load Diff

View File

@ -307,7 +307,7 @@
++ mere :: continue init
~& [%dill-mere our ram]
^+ .
=/ myt (flop (need tem))
=/ myt (flop (fall tem ~))
=/ can (clan:title our)
=. tem ~
=. moz :_(moz [hen %pass ~ %g %conf [[our ram] %load our %home]])

View File

@ -549,22 +549,22 @@
++ lobe @uvI :: blob ref
++ maki {p/@ta q/@ta r/@ta s/path} ::
++ miso :: ankh delta
$% {$del ~} :: delete
$% {$del ~} :: delete
{$ins p/cage} :: insert
{$dif p/cage} :: mutate from diff
{$mut p/cage} :: mutate from raw
== ::
++ misu :: computed delta
$% {$del ~} :: delete
$% {$del ~} :: delete
{$ins p/cage} :: insert
{$dif p/lobe q/cage} :: mutate from diff
== ::
++ mizu {p/@u q/(map @ud tako) r/rang} :: new state
++ moar {p/@ud q/@ud} :: normal change range
++ moat {p/case q/case r/path} :: change range
+$ moat [from=case to=case =path] :: change range
++ mode (list {path (unit mime)}) :: external files
++ mood {p/care q/case r/path} :: request in desk
++ mool {p/case q/(set (pair care path))} :: requests in desk
+$ mood [=care =case =path] :: request in desk
+$ mool [=case paths=(set (pair care path))] :: requests in desk
++ nori :: repository action
$% {%& p/soba} :: delta
{%| p/@tas} :: label
@ -585,10 +585,10 @@
r/cage :: data
== ::
++ rave :: general request
$% {$sing p/mood} :: single request
{$next p/mood} :: await next version
{$mult p/mool} :: next version of any
{$many p/? q/moat} :: track range
$% [%sing =mood] :: single request
[%next =mood] :: await next version
[%mult =mool] :: next version of any
[%many track=? =moat] :: track range
== ::
++ real :: resolved permissions
$: mod/?($black $white) ::