Minor changes to update...

This commit is contained in:
Jared Hance 2014-08-05 11:18:05 -04:00
parent 125b0a9603
commit aca0aaf5a6

View File

@ -44,12 +44,12 @@
?: =(~zod who) [~ ~]
=+ bos==+(bos=(sein who) ?:(=(bos who) ~zod bos))
=+ syn=`(list ,@tas)`~[%main %try %arvo]
=+ owr=((hard dome) .^(%cv /(scot %p who)/main/[wen]))
=+ ^= desks
%+ turn syn
%+ turn syn
|= des=desk
~& [%fetch des]
=+ der=((hard dome) .^(%cv /(scot %p bos)/[des]/[wen]))
=+ owr=((hard dome) .^(%cv /(scot %p who)/[des]/[wen]))
[der owr des]
%+ pomp "fetched new objects, merging"
%- (posh est) :: hack