X-Git-Url: https://git.hcoop.net/hcoop/domtool2.git/blobdiff_plain/60695e9923af9e74160575b5de0d5549808294b4..be1bea4c0a2a4cfa0b86beccfa423366b94b84b4:/src/main.sml

diff --git a/src/main.sml b/src/main.sml
index 9f06c5b..0c60f08 100644
--- a/src/main.sml
+++ b/src/main.sml
@@ -299,7 +299,7 @@ fun service () =
 				end
 
 			      | MsgGrant acl =>
-				if Acl.query {user = user, class = "group", value = "root"} then
+				if Acl.query {user = user, class = "priv", value = "all"} then
 				    ((Acl.grant acl;
 				      Acl.write Config.aclFile;
 				      Msg.send (bio, MsgOk);
@@ -323,7 +323,7 @@ fun service () =
 				     loop ())
 
 			      | MsgRevoke acl =>
-				if Acl.query {user = user, class = "group", value = "root"} then
+				if Acl.query {user = user, class = "priv", value = "all"} then
 				    ((Acl.revoke acl;
 				      Acl.write Config.aclFile;
 				      Msg.send (bio, MsgOk);