Fixing user determination

[hcoop/domtool2.git] / src / main.sml

diff --git a/src/main.sml b/src/main.sml
index a3b78e8..afd0ce9 100644 (file)
--- a/src/main.sml
+++ b/src/main.sml
@@ -63,11 +63,11 @@ fun basis () =
 
 fun check fname =
     let
-       val uid = Posix.ProcEnv.getuid ()
+       (*val uid = Posix.ProcEnv.getuid ()
        val user = Posix.SysDB.Passwd.name (Posix.SysDB.getpwuid uid)
 
        val () = Acl.read Config.aclFile
-       val () = Domain.setUser user
+       val () = Domain.setUser user*)
 
        val _ = ErrorMsg.reset ()
        val _ = Env.preTycheck ()