Просмотр исходного кода

No such fun - gettext_compile:open_po_file/3

Signed-off-by: Peter Lemenkov <lemenkov@gmail.com>
Peter Lemenkov 9 лет назад
Родитель
Сommit
adba128666
1 измененных файлов с 7 добавлено и 1 удалено
  1. 7 1
      src/i18n/po_generator.erl

+ 7 - 1
src/i18n/po_generator.erl

@@ -15,11 +15,17 @@
 %%
 %% API Functions
 %%
+-define(LANG_DIR, "lang").
+-define(POFILE, "gettext.po").
 generate_file(Lang,Items, Fuzzy) ->
     Gettext_App_Name = "tmp",
     GtxtDir = ".",
     io:format("Opening po file"),
-    gettext_compile:open_po_file(Gettext_App_Name, GtxtDir, Lang),
+    DefDir = filename:join([GtxtDir, ?LANG_DIR, Gettext_App_Name, Lang]),
+    Fname = filename:join([DefDir, ?POFILE]),
+    filelib:ensure_dir(Fname),
+    {ok,Fd} = file:open(Fname, [write]),
+    put(fd,Fd),
 
     gettext_compile:write_header(),
     io:format("Writing entries~n"),