name = id ^ ".wbl"}
in
TextIO.output (fd, "LogFile\t");
- TextIO.output (fd, Config.homeBase);
- TextIO.output (fd, "/");
- TextIO.output (fd, user);
- TextIO.output (fd, "/apache/log/");
- TextIO.output (fd, node);
- TextIO.output (fd, "/");
- TextIO.output (fd, hostname);
+ TextIO.output (fd, Apache.logDir {user = user, node = node, vhostId = hostname});
TextIO.output (fd, "/access.log\nOutputDir\t");
TextIO.output (fd, Config.Webalizer.outputDir);
TextIO.output (fd, "/");
| _ => ()
end)
+val () = Domain.registerResetLocal (fn () =>
+ app (fn (node, _) =>
+ ignore (OS.Process.system (Config.rm ^ " -rf "
+ ^ Config.Webalizer.configDir ^ "/"
+ ^ node ^ "/*"))) Config.nodeIps)
+
end