X-Git-Url: http://git.onelab.eu/?a=blobdiff_plain;f=backend.ml;h=690f1c68e88bb30972cb2acbd186eba3a2e18fcb;hb=87c0dc3957634fe643267904d0cedfed80a03f68;hp=2f373c0cb7c64913dfd7519a065e681bd599a855;hpb=8e8e13b87b5d592621be0a15a19b5ea0a1fad0b5;p=vsys.git

diff --git a/backend.ml b/backend.ml
index 2f373c0..690f1c6 100644
--- a/backend.ml
+++ b/backend.ml
@@ -63,7 +63,7 @@ class backendHandler dir_root (frontend_lst: frontendHandler list) =
                 Dirwatcher.add_watch fqp [S_Create;S_Delete] (Some(func)) 
               end
               with _ ->
-                printf "Could not create %s. Looks like a slice shot itself in the foot\n" fqp;flush Pervasives.stdout;
+                fprintf logfd "Could not create %s. Looks like a slice shot itself in the foot\n" fqp;flush logfd;
            )
            slice_list
 
@@ -171,7 +171,7 @@ class backendHandler dir_root (frontend_lst: frontendHandler list) =
                        | S_REG ->
                            this#new_script slice_list fqp
                        | _ ->
-                           printf "Don't know what to do with %s\n" curfile;flush Pervasives.stdout
+                           fprintf logfd "Don't know what to do with %s\n" curfile;flush logfd
                    end
            with 
                _->cont:=false;()