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

[mldonkey-commits]

CVSROOT:        /sources/mldonkey
Module name:    mldonkey
Changes by:     spiralvoice <spiralvoice>       06/10/02 00:28:20

Modified files:
        distrib        : ChangeLog 
        src/daemon/common: commonFile.mli 

Log message:
        patch #5429

CVSWeb URLs:
http://cvs.savannah.gnu.org/viewcvs/mldonkey/distrib/ChangeLog?cvsroot=mldonkey&r1=1.1036&r2=1.1037
http://cvs.savannah.gnu.org/viewcvs/mldonkey/src/daemon/common/commonFile.mli?cvsroot=mldonkey&r1=1.24&r2=1.25

Patches:
Index: distrib/ChangeLog
===================================================================
RCS file: /sources/mldonkey/mldonkey/distrib/ChangeLog,v
retrieving revision 1.1036
retrieving revision 1.1037
diff -u -b -r1.1036 -r1.1037
--- distrib/ChangeLog   1 Oct 2006 17:53:59 -0000       1.1036
+++ distrib/ChangeLog   2 Oct 2006 00:28:19 -0000       1.1037
@@ -14,6 +14,9 @@
 ChangeLog
 =========
 
+2006/10/02
+5429: Fix compile bug in Ocaml 3.08.3 (thx to eike for reporting)
+
 2006/10/01
 5404: New command porttest, support for eMule- and Azureus-style porttest
       (thx to pango for Azureus result parsing)

Index: src/daemon/common/commonFile.mli
===================================================================
RCS file: /sources/mldonkey/mldonkey/src/daemon/common/commonFile.mli,v
retrieving revision 1.24
retrieving revision 1.25
diff -u -b -r1.24 -r1.25
--- src/daemon/common/commonFile.mli    1 Oct 2006 17:47:11 -0000       1.24
+++ src/daemon/common/commonFile.mli    2 Oct 2006 00:28:20 -0000       1.25
@@ -17,6 +17,8 @@
     Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA  02111-1307  USA
 *)
 
+open Autoconf
+
 type 'a file_impl = {
     mutable impl_file_owner : string;
     mutable impl_file_group : string option;
@@ -152,4 +154,4 @@
 val set_file_group_safe : CommonTypes.file -> string -> string option -> bool
 val file_group : CommonTypes.file -> string option
 val file_group_text : CommonTypes.file -> string
-val lprintf_file_nl : CommonTypes.file -> ('a, unit, unit) Autoconf.format -> 
'a
+val lprintf_file_nl : CommonTypes.file -> ('a, unit, unit) format -> 'a