payment: note that Stripe has instituted an additional 1% fee for non-US cards

[hcoop/portal.git] / domtool.sml

diff --git a/domtool.sml b/domtool.sml
index 6558774..138daee 100644 (file)
--- a/domtool.sml
+++ b/domtool.sml
@@ -2,7 +2,7 @@ structure Domtool :> DOMTOOL = struct
 
 fun perms class user =
     let
-       val proc = Unix.execute ("/bin/sh", ["-c", "DOMTOOL_USER=hcoop /usr/local/bin/domtool-admin perms " ^ user])
+       val proc = Unix.execute ("/bin/sh", ["-c", "DOMTOOL_USER=hcoop.daemon /usr/local/bin/domtool-admin perms " ^ user])
        val inf = Unix.textInstreamOf proc
 
        fun loop () =