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

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

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

revision 1.3 by spiralvoice, Sun Jul 10 13:28:50 2005 UTC revision 1.4 by spiralvoice, Fri Aug 5 00:56:13 2005 UTC
# Line 23  open Printf2 Line 23  open Printf2
23  open Options  open Options
24  open Gettext  open Gettext
25    
26  let filename = Filename.concat CommonOptions.config_dir "mlnet_strings"  let filename = Filename.concat CommonOptions.home_dir "mlnet_strings"
27    
28  let _s x = (* lprintf "searching string %s\n" x; *) GuiUtf8.simple_utf8_of (_s "GuiMessages" x)  let _s x = (* lprintf "searching string %s\n" x; *) GuiUtf8.simple_utf8_of (_s "GuiMessages" x)
29    
# Line 970  let load_messages () = Line 970  let load_messages () =
970  (* Messages and string constants. *)  (* Messages and string constants. *)
971    
972  let chat_config_file =  let chat_config_file =
973    Filename.concat CommonOptions.config_dir "chat.ini"    Filename.concat CommonOptions.home_dir "chat.ini"
974    
975  (* {2 Command line messages} *)  (* {2 Command line messages} *)
976    

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