From 8842a0a397372c599175c69bdca6f1ff5ca05a7d Mon Sep 17 00:00:00 2001 From: Anthony Date: Wed, 31 Jan 2018 17:31:41 -0800 Subject: [PATCH] updated mark to use booleasn for pub and vis --- mar/collections/action.hoon | 10 +++------- 1 file changed, 3 insertions(+), 7 deletions(-) diff --git a/mar/collections/action.hoon b/mar/collections/action.hoon index a778bdde6..a27906c51 100644 --- a/mar/collections/action.hoon +++ b/mar/collections/action.hoon @@ -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))))