X-Git-Url: http://git.onelab.eu/?a=blobdiff_plain;f=main.ml;h=43410aefa3069d509ca336ded44d1c5ad5c7ee63;hb=c83cc6c663566b82531b670f8b492c6ff1e1f18f;hp=907d65e60e63886bdcc06b6e5413cc079a5149c8;hpb=e56b5ef0bbec1c22df1f8f82d4e75ec1785fc2ea;p=vsys.git diff --git a/main.ml b/main.ml index 907d65e..43410ae 100644 --- a/main.ml +++ b/main.ml @@ -26,13 +26,13 @@ let cmdspeclist = ] let _ = - logprint "Starting Vsys v%s\n" Globals.vsys_version; - print "Starting Vsys v%s\n" Globals.vsys_version; Arg.parse cmdspeclist (fun x->()) "Usage: vsys "; + Globals.logfd:=open_out_gen [Open_append;Open_creat] 0o644 !log_filepath; if (!Globals.backend == "") then printf "Try vsys --help\n" else begin + logprint "Starting Vsys v%s\n" Globals.vsys_version; if (!daemonize) then begin print "Daemonizing\n";