Change Webalizer config to live in AFS

[hcoop/domtool2.git] / src / plugins / webalizer.sml

diff --git a/src/plugins/webalizer.sml b/src/plugins/webalizer.sml
index 313a582..61d2b08 100644 (file)
--- a/src/plugins/webalizer.sml
+++ b/src/plugins/webalizer.sml
@@ -102,12 +102,7 @@ val () = Slave.registerFileHandler (fn fs =>
                                                         if Posix.FileSys.access (dir, []) then
                                                             ()
                                                         else
                                                         if Posix.FileSys.access (dir, []) then
                                                             ()
                                                         else

-                                                            Posix.FileSys.mkdir (dir, Posix.FileSys.S.flags
-                                                                                          [Posix.FileSys.S.iroth,
-                                                                                           Posix.FileSys.S.ixoth,
-                                                                                           Posix.FileSys.S.irwxu,
-                                                                                           Posix.FileSys.S.irgrp,
-                                                                                           Posix.FileSys.S.iwgrp])
+                                                            OS.FileSys.mkDir dir

                                                     end))
                                             | _ => ()
                                       end)
                                                     end))
                                             | _ => ()
                                       end)