ilyakooo0/urbit
1
0
Fork 0
mirror of https://github.com/ilyakooo0/urbit.git synced 2024-12-15 18:12:47 +03:00
Code Issues Packages Projects Releases Wiki Activity

updated mark to use booleasn for pub and vis

Browse Source
This commit is contained in:
Anthony 2018-01-31 17:31:41 -08:00
parent fd110091fa
commit 8842a0a397
1 changed files with 3 additions and 7 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

10
mar/collections/action.hoon
View File

@ -37,14 +37,10 @@
:: (ot wat+(cu (hard kind) so) des+so pub+bo vis+bo ses+(as (se %p)) ~)
|= a=json
~| a
=+ ^- [wat=kind des=cord ses=(set @p)]
=+ ^- [wat=kind des=cord pub=? vis=? ses=(set @p)]
%. a
:: ses expects an ace-delimited string of ship names
:: TODO change to an array of strings AA
(ot wat+(cu (hard kind) so) des+so ses+(su (cook sy (more ace fed:ag))) ~)
?> ?=([%o *] a)
=/ pub (~(has by p.a) %pub)
=/ vis (~(has by p.a) %vis)
:: change this to accept an array of @p
(ot wat+(cu (hard kind) so) des+so pub+bo vis+bo ses+(su (cook sy (more ace fed:ag))) ~)
[wat des pub vis ses]
::
++ wain (su (more newline (cook crip (star prn))))