X-Git-Url: https://git.hcoop.net/hcoop/domtool2.git/blobdiff_plain/0c1953842263eaffd303d1d7614ae64a11d4dc39..edf5dcbb8691753a607241508652acd680897949:/src/main.sml?ds=inline diff --git a/src/main.sml b/src/main.sml index 02bb485..62af91b 100644 --- a/src/main.sml +++ b/src/main.sml @@ -1128,10 +1128,12 @@ fun describeQuery q = fun service () = let + val host = Slave.hostname () + val () = Acl.read Config.aclFile - - val context = context (Config.serverCert, - Config.serverKey, + + val context = context (Config.certDir ^ "/" ^ host ^ ".pem", + Config.keyDir ^ "/" ^ host ^ "/key.pem", Config.trustStore) val _ = Domain.set_context context