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

[mldonkey-commits]

Index: mldonkey/src/utils/cdk/gd.ml
diff -u mldonkey/src/utils/cdk/gd.ml:1.2 mldonkey/src/utils/cdk/gd.ml:1.3
--- mldonkey/src/utils/cdk/gd.ml:1.2    Mon Aug  1 20:09:13 2005
+++ mldonkey/src/utils/cdk/gd.ml        Wed Aug 31 23:54:02 2005
@@ -164,21 +164,6 @@
 
 external png_version : unit -> int32 = "ml_image_pngversion"
 
-let png_version_num () =
-  begin
-    try
-      let s = Int32.to_string(png_version ()) in
-        let len = String.length s in
-        let major_version = String.sub s 0 1 in
-       let minor_version = String.sub s 1 2 in
-       let release_version = String.sub s 3 (len-3) in
-         Printf.sprintf "%ld.%ld.%ld"
-           (Int32.of_string(major_version))
-           (Int32.of_string(minor_version))
-           (Int32.of_string(release_version))
-    with e -> ""
-  end
-
 module Font =
 struct
   let tiny = do_get_font 0