/[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.40 by spiralvoice, Fri Jul 29 15:40:33 2005 UTC revision 1.41 by spiralvoice, Fri Jul 29 20:42:47 2005 UTC
# Line 484  let html_mods_commands buf n c l = Line 484  let html_mods_commands buf n c l =
484    
485  let html_mods_table_header buf n c l =  let html_mods_table_header buf n c l =
486      (* Name Class List *)      (* Name Class List *)
487      Printf.bprintf buf "\\<div class=\\\"%s\\\"\\>\\<table id=\\\"%s\\\" name=\\\"%s\\\" class=\\\"%s\\\" cellspacing=0 cellpadding=0\\>"      Printf.bprintf buf "\\<div class=\\\"%s\\\"\\>\\<table id=\\\"%s\\\" name=\\\"%s\\\" class=\\\"%s\\\" cellspacing=0 cellpadding=0\\>\\<tr\\>"
488      c n n c;      c n n c;
489      if List.length l > 0 then begin      List.iter (fun (w,x,y,z)  ->
490          Printf.bprintf buf "\\<tr\\>";       (* Sort Class Title Value *)
491          List.iter (fun (w,x,y,z)  ->       Printf.bprintf buf "\\<td onClick=\\\"_tabSort(this,%s);\\\" class=\\\"%s\\\" title=\\\"%s\\\"\\>%s\\</td\\>"
492           (* Sort Class Title Value *)       w x y z;
493           Printf.bprintf buf "\\<td onClick=\\\"_tabSort(this,%s);\\\" class=\\\"%s\\\" title=\\\"%s\\\"\\>%s\\</td\\>"      ) l;
494           w x y z;      Printf.bprintf buf "\\</tr\\>"
495          ) l;  
         Printf.bprintf buf "\\</tr\\>"  
       end  
496  (* Add colspan functionality to html_mods_table_header *)  (* Add colspan functionality to html_mods_table_header *)
497    
498  let html_mods_table_header_colspan buf n c l =  let html_mods_table_header_colspan buf n c l =

Legend:
Removed from v.1.40  
changed lines
  Added in v.1.41

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