/[mldonkey]/mldonkey/src/daemon/common/commonGlobals.ml
ViewVC logotype

Diff of /mldonkey/src/daemon/common/commonGlobals.ml

Parent Directory Parent Directory | Revision Log Revision Log | View Patch Patch

revision 1.48 by spiralvoice, Thu Aug 18 14:12:30 2005 UTC revision 1.49 by spiralvoice, Sun Aug 21 15:39:21 2005 UTC
# Line 127  let buildinfo () = Line 127  let buildinfo () =
127               else " no-zlib")               else " no-zlib")
128            ^ (if Autoconf.has_bzip2 then            ^ (if Autoconf.has_bzip2 then
129                 begin                 begin
130                   let s = List.hd(String2.split_simplify                   let s =
131                     (Bzip2.bzlib_version_num ()) ',') in                     (* catch the exception in the case Bzip2.bzlib_version_num returns an empty string *)
132                       Printf.sprintf " bzip2%s" (if s <> "" then "-" ^ s else "")                     try
133                         List.hd(String2.split_simplify
134                       (Bzip2.bzlib_version_num ()) ',')
135                       with e -> ""
136                     in
137                     Printf.sprintf " bzip2%s" (if s <> "" then "-" ^ s else "")
138                 end                 end
139               else " no-bzip2")               else " no-bzip2")
140            ^ (if Autoconf.has_gd && Autoconf.has_gd_png && Autoconf.has_gd_jpg then            ^ (if Autoconf.has_gd && Autoconf.has_gd_png && Autoconf.has_gd_jpg then

Legend:
Removed from v.1.48  
changed lines
  Added in v.1.49

savannah-hackers-public@gnu.org
ViewVC Help
Powered by ViewVC 1.1.26