/[mldonkey]/mldonkey/src/gtk/newgui/gui_networks.ml
ViewVC logotype

Diff of /mldonkey/src/gtk/newgui/gui_networks.ml

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

revision 1.3 by mldonkey, Mon Feb 2 19:55:20 2004 UTC revision 1.4 by spiralvoice, Tue Jun 28 23:17:07 2005 UTC
# Line 101  let retrieve_net_box name box = Line 101  let retrieve_net_box name box =
101      | "Fasttrack" -> (box#box_ftt, 2)      | "Fasttrack" -> (box#box_ftt, 2)
102      | "Donkey" -> (box#box_ed2k, 3)      | "Donkey" -> (box#box_ed2k, 3)
103      | "Gnutella" -> (box#box_gnut, 4)      | "Gnutella" -> (box#box_gnut, 4)
104      | "Open Napster" -> (box#box_nap, 5)      | "OpenNapster" -> (box#box_nap, 5)
105      | "Soulseek" -> (box#box_slsk, 6)      | "Soulseek" -> (box#box_slsk, 6)
106      | _ -> raise Not_found      | _ -> raise Not_found
107    

Legend:
Removed from v.1.3  
changed lines
  Added in v.1.4

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