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

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

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

revision 1.50 by spiralvoice, Thu Oct 6 17:34:21 2005 UTC revision 1.51 by spiralvoice, Sun Oct 16 20:42:50 2005 UTC
# Line 576  let send_custom_query user buf query arg Line 576  let send_custom_query user buf query arg
576            if maxsize = "" then raise Not_found;            if maxsize = "" then raise Not_found;
577            let maxsize = Int64.of_string maxsize in            let maxsize = Int64.of_string maxsize in
578            let unit = Int64.of_string unit in            let unit = Int64.of_string unit in
579            QHasMaxVal (Field_Size, Int64.mul maxsize unit)            QHasMaxVal (Field_Size, maxsize ** unit)
580    
581        | Q_FORMAT _ ->        | Q_FORMAT _ ->
582            let format = get_arg "format" in            let format = get_arg "format" in

Legend:
Removed from v.1.50  
changed lines
  Added in v.1.51

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