diff options
Diffstat (limited to 'stdlib/source/lux/control/security/policy.lux')
| -rw-r--r-- | stdlib/source/lux/control/security/policy.lux | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/stdlib/source/lux/control/security/policy.lux b/stdlib/source/lux/control/security/policy.lux index f61f4c58b..d210f91e1 100644 --- a/stdlib/source/lux/control/security/policy.lux +++ b/stdlib/source/lux/control/security/policy.lux @@ -27,7 +27,7 @@ {#can-upgrade (Can-Upgrade brand label) #can-downgrade (Can-Downgrade brand label)}) - (def: Privilege<_> + (def: privilege Privilege {#can-upgrade (..can-upgrade (|>> :abstraction)) #can-downgrade (..can-downgrade (|>> :representation))}) @@ -53,7 +53,7 @@ (Ex [label] (-> (Context brand scope label) (scope label)))) - (context ..Privilege<_>)) + (context ..privilege)) (def: (decorate constructor) (-> Type Type) |