Slave dispatching working
[hcoop/domtool2.git] / src / slave.sml
index 4e44a8b..b1303b8 100644 (file)
@@ -29,7 +29,7 @@ type file_status = {action : file_action,
                    domain : string,
                    dir : string,
                    file : string}
                    domain : string,
                    dir : string,
                    file : string}
-                  
+
 val fileHandler = ref (fn _ : file_status => ())
 val preHandler = ref (fn () => ())
 val postHandler = ref (fn () => ())
 val fileHandler = ref (fn _ : file_status => ())
 val preHandler = ref (fn () => ())
 val postHandler = ref (fn () => ())