| ["tpe", node, uname] => OS.Process.exit (Main.requestTrustedPath {node = node, uname = uname})
| ["sockperm", node, uname] => OS.Process.exit (Main.requestSocketPerm {node = node, uname = uname})
| ["firewall", node, uname] => OS.Process.exit (Main.requestFirewall {node = node, uname = uname})
- | ["describe", dom] => print (Domain.describe dom)
+ | ["describe", dom] => Main.requestDescribe dom
| ["users"] =>
(Acl.read Config.aclFile;
app (fn s => (print s; print "\n")) (Acl.users ()))