/[mldonkey]/mldonkey/src/gtk2/gui/guiStatusBar.ml
ViewVC logotype

Diff of /mldonkey/src/gtk2/gui/guiStatusBar.ml

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

revision 1.1 by spiralvoice, Wed Mar 2 19:45:11 2005 UTC revision 1.2 by spiralvoice, Sun Oct 16 20:42:53 2005 UTC
# Line 161  let update_labels () = Line 161  let update_labels () =
161  (*************************************************************************)  (*************************************************************************)
162    
163  let clear () =  let clear () =
164    update_sharedfiles 0 (Int64.of_int 0);    update_sharedfiles 0 Int64.zero;
165    update_downloadedfiles ();    update_downloadedfiles ();
166    update_servers ();    update_servers ();
167    update_updown 0 0    update_updown 0 0
# Line 213  let status_box () = Line 213  let status_box () =
213    
214    
215  let _ =  let _ =
216    update_sharedfiles 0 (Int64.of_int 0);    update_sharedfiles 0 Int64.zero;
217    update_downloadedfiles ();    update_downloadedfiles ();
218    update_servers ();    update_servers ();
219    update_updown 0 0;    update_updown 0 0;

Legend:
Removed from v.1.1  
changed lines
  Added in v.1.2

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