[Mldonkey-commits] Changes to mldonkey/src/daemon/driver/driverMain.ml

[mldonkey-commits]

Index: mldonkey/src/daemon/driver/driverMain.ml
diff -u mldonkey/src/daemon/driver/driverMain.ml:1.59 
mldonkey/src/daemon/driver/driverMain.ml:1.60
--- mldonkey/src/daemon/driver/driverMain.ml:1.59       Tue Jul 26 20:49:44 2005
+++ mldonkey/src/daemon/driver/driverMain.ml    Wed Jul 27 19:57:24 2005
@@ -53,8 +53,7 @@
 let keep_console_output = ref false
 
 let do_daily () =
-  incr CommonWeb.days;
-  CommonWeb.load_web_infos ()
+  incr CommonWeb.days
 
 let minute_timer () =
   CommonShared.shared_check_files ();
@@ -73,7 +72,7 @@
 
 let hourly_timer timer =
   incr CommonWeb.hours;
-  if !CommonWeb.hours mod 24 = 0 then do_daily ();
+  CommonWeb.load_web_infos ();
   if !CommonWeb.hours mod !!compaction_delay = 0 then Gc.compact ();
   DriverControlers.check_calendar ();
   CommonWeb.connect_redirector ();