Remove weird chown root business
authorAdam Chlipala <adamc@hcoop.net>
Sun, 23 Jul 2006 17:54:57 +0000 (17:54 +0000)
committerAdam Chlipala <adamc@hcoop.net>
Sun, 23 Jul 2006 17:54:57 +0000 (17:54 +0000)
src/djbdns/djbdns.sml

index 81aeb33..386deb6 100644 (file)
@@ -247,10 +247,10 @@ struct
                                               (rm ^ " -rf " ^ afxrSlaves ^ "; " ^ mv ^ " -f " ^ afxrSlavesTemp ^ " " ^ afxrSlaves))) then
            (print "Error copying AFXR slaves\n";
             OS.Process.failure)
-       else if not (OS.Process.isSuccess (OS.Process.system
+       (*else if not (OS.Process.isSuccess (OS.Process.system
                                               (chown ^ " -R root.root " ^ afxrSlaves))) then
            (print "Error chown'ing AFXR slaves\n";
-            OS.Process.failure)
+            OS.Process.failure)*)
        else if not (OS.Process.isSuccess (OS.Process.system
                                               (cp ^ " " ^ scratchDir ^ "/data.shared " ^ dataFile))) then
            (print "Error copying data.shared\n";