[Mldonkey-commits] mldonkey distrib/ChangeLog src/daemon/common/co...

[mldonkey-commits]

CVSROOT:        /sources/mldonkey
Module name:    mldonkey
Branch:         
Changes by:     spiralvoice <address@hidden>    05/12/28 10:38:34

Modified files:
        distrib        : ChangeLog 
        src/daemon/common: commonOptions.ml 

Log message:
        patch #4735

CVSWeb URLs:
http://cvs.savannah.gnu.org/viewcvs/mldonkey/mldonkey/distrib/ChangeLog.diff?tr1=1.636&tr2=1.637&r1=text&r2=text
http://cvs.savannah.gnu.org/viewcvs/mldonkey/mldonkey/src/daemon/common/commonOptions.ml.diff?tr1=1.109&tr2=1.110&r1=text&r2=text

Patches:
Index: mldonkey/distrib/ChangeLog
diff -u mldonkey/distrib/ChangeLog:1.636 mldonkey/distrib/ChangeLog:1.637
--- mldonkey/distrib/ChangeLog:1.636    Wed Dec 28 10:36:26 2005
+++ mldonkey/distrib/ChangeLog  Wed Dec 28 10:38:33 2005
@@ -12,6 +12,7 @@
 http://mldonkey.berlios.de/modules.php?name=Wiki&pagename=Windows
 
 2005/12/28
+4735: MinGW: pause before core exit because of existing Pid file
 4736: New commands: sysinfo, runinfo and diskinfo
 * removed temp_directory and core_directory from shares command output
 * new commands sysinfo, runinfo and diskinfo
Index: mldonkey/src/daemon/common/commonOptions.ml
diff -u mldonkey/src/daemon/common/commonOptions.ml:1.109 
mldonkey/src/daemon/common/commonOptions.ml:1.110
--- mldonkey/src/daemon/common/commonOptions.ml:1.109   Mon Dec 19 00:11:56 2005
+++ mldonkey/src/daemon/common/commonOptions.ml Wed Dec 28 10:38:34 2005
@@ -181,7 +181,11 @@
              if Autoconf.system = "mingw" then lprintf_nl
                "can not check for stalled pid file because Unix.kill is not 
implemented on MinGW";
              lprintf_nl "Exception %s, exiting..." (Printexc2.to_string e);
-        exit 2
+             if Autoconf.system = "mingw" then begin
+               lprintf_nl "waiting 10 seconds to exit...";
+               Unix.sleep 10;
+             end;
+             exit 2
       end;
 
   let filename =