[Mldonkey-commits] Changes to mldonkey/src/utils/cdk/bzip2.ml

[mldonkey-commits]

Index: mldonkey/src/utils/cdk/bzip2.ml
diff -u mldonkey/src/utils/cdk/bzip2.ml:1.1 mldonkey/src/utils/cdk/bzip2.ml:1.2
--- mldonkey/src/utils/cdk/bzip2.ml:1.1 Sat Jul 23 14:19:48 2005
+++ mldonkey/src/utils/cdk/bzip2.ml     Mon Aug  1 20:09:13 2005
@@ -175,3 +175,9 @@
   flush oz;
   Pervasives.close_out oz.out_chan
 
+let bzlib_version_num () =
+  begin
+    try
+      let s = Printf.sprintf "%s" (Bzlib.bzlib_version ()) in s
+    with e -> ""
+  end