[Mldonkey-commits] Changes to mldonkey/src/daemon/driver/driverCommands.ml

[mldonkey-commits]

Index: mldonkey/src/daemon/driver/driverCommands.ml
diff -u mldonkey/src/daemon/driver/driverCommands.ml:1.75 
mldonkey/src/daemon/driver/driverCommands.ml:1.76
--- mldonkey/src/daemon/driver/driverCommands.ml:1.75   Thu Jul 28 18:22:31 2005
+++ mldonkey/src/daemon/driver/driverCommands.ml        Fri Jul 29 15:40:33 2005
@@ -987,7 +987,7 @@
                 let newrd = int_of_string (List.hd args) in
                 if newrd > 1 then refresh_delay := newrd;
               end;
-            Printf.bprintf buf "\\<meta http-equiv=\\\"refresh\\\" 
content=\\\"%d\\\"\\>" !refresh_delay;
+            Printf.bprintf buf "\\</body\\>\\<head\\>\\<meta 
http-equiv=\\\"refresh\\\" content=\\\"%d\\\"\\>\\</head\\>\\<body\\>" 
!refresh_delay;
 
             let dlkbs =
               (( (float_of_int !udp_download_rate) +. (float_of_int 
!control_download_rate)) /. 1024.0) in
@@ -2676,7 +2676,7 @@
             List.iter (fun line ->
                 Printf.bprintf buf "\\<tr class=\\\"dl-1\\\"\\>";
                 html_mods_td buf [ ("", "sr", line); ];
-                Printf.bprintf buf "\\</tr\\>\\";
+                Printf.bprintf buf "\\</tr\\>";
             ) lines;
             Printf.bprintf buf "\\</tr\\>\\</table\\>\\</div\\>\\</div\\>";
             Buffer.contents buf