fixed to work in its final location

This commit is contained in:
Viktor Szakats
2013-03-30 00:30:11 +01:00
parent 3851b7d40b
commit 30d6468c03

View File

@@ -18,7 +18,7 @@ PROCEDURE Main( cLogin )
FClose( hb_FTempCreateEx( @cTemp ) )
FOR EACH cLang IN hb_ATokens( hb_regexAll( "-lng=([a-zA-Z0-9_,]*)", hb_MemoRead( hb_DirSepToOS( "../hbmk2.hbp" ) ),,,,, .T. )[ 1 ][ 2 ], "," )
FOR EACH cLang IN hb_ATokens( hb_regexAll( "-lng=([a-zA-Z0-9_,]*)", hb_MemoRead( "hbmk2.hbp" ),,,,, .T. )[ 1 ][ 2 ], "," )
? cLang
@@ -26,7 +26,7 @@ PROCEDURE Main( cLogin )
cLogin, cLang, cTemp ) )
IF hb_jsonDecode( GetJSON( hb_MemoRead( cTemp ) ), @json ) > 0
hb_MemoWrit( "hbmk2." + cLang + ".po", StrTran( json[ "content" ], e"\n", hb_eol() ) )
hb_MemoWrit( hb_DirSepToOS( "po/hbmk2." + cLang + ".po" ), StrTran( json[ "content" ], e"\n", hb_eol() ) )
ELSE
? "error"
ENDIF