diff options
Diffstat (limited to 'src')
| -rw-r--r-- | src/translate.erl | 8 |
1 files changed, 6 insertions, 2 deletions
diff --git a/src/translate.erl b/src/translate.erl index 616d8927..0488530f 100644 --- a/src/translate.erl +++ b/src/translate.erl @@ -67,8 +67,12 @@ load_dir(Dir) -> end, Files), lists:foreach( fun(FN) -> - L = ascii_tolower( - string:substr(FN, 1, string:len(FN) - 4)), + LP = ascii_tolower( + string:substr(FN, 1, string:len(FN) - 4)), + L = case string:tokens(LP, ".") of + [Language] -> Language; + [Language, _Project] -> Language + end, load_file(L, Dir ++ "/" ++ FN) end, MsgFiles), ok; |