ilyakooo0/urbit
1
0
Fork 0
mirror of https://github.com/ilyakooo0/urbit.git synced 2024-11-14 04:19:22 +03:00
Code Issues Packages Projects Releases Wiki Activity

Merge pull request #6022 from dr-frmr/hw/aqua-swap-files-fix

Browse Source 
aqua: make `%swap-files` poke take a desk and add it to pill
This commit is contained in:
Philip Monk 2022-10-01 15:49:33 -07:00 committed by GitHub
commit 7940dd442b
No known key found for this signature in database
GPG Key ID: 4AEE18F83AFDEB23
1 changed files with 7 additions and 5 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

12
pkg/arvo/app/aqua.hoon
View File

@ -7,6 +7,7 @@
:: OR :: OR
:: :aqua &pill +solid :: :aqua &pill +solid
:: ::
:: XX: update these examples
:: Then try stuff: :: Then try stuff:
:: :aqua [%init ~[~bud ~dev]] :: :aqua [%init ~[~bud ~dev]]
:: :aqua [%dojo ~[~bud ~dev] "[our eny (add 3 5)]"] :: :aqua [%dojo ~[~bud ~dev] "[our eny (add 3 5)]"]
@ -480,14 +481,15 @@
=^ ms state (poke-pill pil) =^ ms state (poke-pill pil)
(emit-cards ms) (emit-cards ms)
:: ::
[%swap-files ~] [%swap-files @tas]
=/ =desk +.val
=. userspace-ova.pil =. userspace-ova.pil
=/ slim-dirs=(list path) :: take all files from a userspace desk
~[/app /ted /gen /lib /mar /sur /hoon/sys /arvo/sys /zuse/sys] =/ all-dirs=(list path) ~[/]
:_ ~ :_ ~
%- unix-event:pill-lib %- unix-event:pill-lib
%- %*(. file-ovum:pill-lib directories slim-dirs) %+ %*(. file-ovum:pill-lib directories all-dirs)
/(scot %p our.hid)/work/(scot %da now.hid) desk /(scot %p our.hid)/[desk]/(scot %da now.hid)
=^ ms state (poke-pill pil) =^ ms state (poke-pill pil)
(emit-cards ms) (emit-cards ms)
:: ::