2009-05-29 18:31 UTC+0200 Viktor Szakats (harbour.01 syenar hu)
* utils/hbmk2/hbmk2.pt_BR.po
* utils/hbmk2/hbmk2.hu_HU.po
* utils/hbmk2/hbmk2.hbm
* utils/hbmk2/hbmk2.prg
* utils/hbi18n/hbi18n.prg
* hbi -> hbl (settling back, again sorry for the mess).
* examples/terminal/trm_misc.c
% Removed unused Windows function.
This commit is contained in:
@@ -17,6 +17,17 @@
|
||||
past entries belonging to these authors: Viktor Szakats.
|
||||
*/
|
||||
|
||||
2009-05-29 18:31 UTC+0200 Viktor Szakats (harbour.01 syenar hu)
|
||||
* utils/hbmk2/hbmk2.pt_BR.po
|
||||
* utils/hbmk2/hbmk2.hu_HU.po
|
||||
* utils/hbmk2/hbmk2.hbm
|
||||
* utils/hbmk2/hbmk2.prg
|
||||
* utils/hbi18n/hbi18n.prg
|
||||
* hbi -> hbl (settling back, again sorry for the mess).
|
||||
|
||||
* examples/terminal/trm_misc.c
|
||||
% Removed unused Windows function.
|
||||
|
||||
2009-05-29 18:16 UTC+0200 Viktor Szakats (harbour.01 syenar hu)
|
||||
* examples/terminal/terminal.hbc
|
||||
! hbwin not needed.
|
||||
|
||||
@@ -57,45 +57,6 @@
|
||||
|
||||
#include <shellapi.h>
|
||||
|
||||
// CreateProcess( cExe, cCmdLineArgs, nFlags, cEnvPair, cInitDirectory, @aProcessInfo )
|
||||
//
|
||||
HB_FUNC( CREATEPROCESS )
|
||||
{
|
||||
LPCTSTR lpApplicationName; // name of executable module
|
||||
LPTSTR lpCommandLine; // command line string
|
||||
LPSECURITY_ATTRIBUTES lpProcessAttributes; // SD
|
||||
LPSECURITY_ATTRIBUTES lpThreadAttributes; // SD
|
||||
BOOL bInheritHandles; // handle inheritance option
|
||||
DWORD dwCreationFlags; // creation flags
|
||||
LPVOID lpEnvironment; // new environment block
|
||||
LPCTSTR lpCurrentDirectory; // current directory name
|
||||
LPSTARTUPINFO lpStartupInfo; // startup information
|
||||
LPPROCESS_INFORMATION lpProcessInformation; // process information
|
||||
|
||||
lpApplicationName = NULL;//hb_parc( 1 );
|
||||
lpCommandLine = hb_parc( 1 );
|
||||
lpProcessAttributes = NULL;
|
||||
lpThreadAttributes = NULL;
|
||||
bInheritHandles = TRUE;
|
||||
dwCreationFlags = 0; //ISNUM( 3 ) ? hb_parnl( 3 ) : CREATE_NEW_CONSOLE;
|
||||
lpEnvironment = NULL; //ISCHAR( 4 ) ? hb_parc( 4 ) : NULL;
|
||||
lpCurrentDirectory = NULL; //ISCHAR( 5 ) ? hb_parc( 5 ) : NULL;
|
||||
lpStartupInfo = NULL;
|
||||
|
||||
hb_retl(
|
||||
CreateProcess(
|
||||
lpApplicationName,
|
||||
lpCommandLine,
|
||||
lpProcessAttributes,
|
||||
lpThreadAttributes,
|
||||
bInheritHandles,
|
||||
dwCreationFlags,
|
||||
lpEnvironment,
|
||||
lpCurrentDirectory,
|
||||
lpStartupInfo,
|
||||
NULL ) );
|
||||
}
|
||||
|
||||
HB_FUNC( SHELLEXECUTE )
|
||||
{
|
||||
ShellExecute( NULL,
|
||||
|
||||
@@ -4,7 +4,7 @@
|
||||
|
||||
/*
|
||||
* Harbour Project source code:
|
||||
* Harbour i18n .pot/.hbi file manger
|
||||
* Harbour i18n .pot/.hbl file manger
|
||||
*
|
||||
* Copyright 2009 Przemyslaw Czerpak <druzus / at / priv.onet.pl>
|
||||
* www - http://www.harbour-project.org
|
||||
@@ -54,7 +54,7 @@
|
||||
#include "directry.ch"
|
||||
|
||||
#define _HB_I18N_MERGE 1
|
||||
#define _HB_I18N_GENHBI 2
|
||||
#define _HB_I18N_GENHBL 2
|
||||
#define _HB_I18N_TRANS 3
|
||||
|
||||
PROCEDURE Main( ... )
|
||||
@@ -85,7 +85,7 @@ PROCEDURE Main( ... )
|
||||
IF nMode != 0
|
||||
lError := .T.
|
||||
ELSE
|
||||
nMode := _HB_I18N_GENHBI
|
||||
nMode := _HB_I18N_GENHBL
|
||||
ENDIF
|
||||
ELSEIF param == "a"
|
||||
IF nMode != 0
|
||||
@@ -121,7 +121,7 @@ PROCEDURE Main( ... )
|
||||
IF nMode == _HB_I18N_TRANS
|
||||
FOR n := 1 TO Len( aFiles )
|
||||
hb_FNameSplit( aFiles[ n ],,, @cExt )
|
||||
IF !Lower( cExt ) == ".hbi"
|
||||
IF !Lower( cExt ) == ".hbl"
|
||||
cFileIn := aFiles[ n ]
|
||||
HB_ADel( aFiles, n, .T. )
|
||||
EXIT
|
||||
@@ -140,8 +140,8 @@ PROCEDURE Main( ... )
|
||||
|
||||
IF nMode == _HB_I18N_MERGE
|
||||
Merge( aFiles, cFileOut )
|
||||
ELSEIF nMode == _HB_I18N_GENHBI
|
||||
GenHBI( aFiles, cFileOut, lEmpty )
|
||||
ELSEIF nMode == _HB_I18N_GENHBL
|
||||
GenHBL( aFiles, cFileOut, lEmpty )
|
||||
ELSEIF nMode == _HB_I18N_TRANS
|
||||
AutoTrans( cFileIn, aFiles, cFileOut )
|
||||
ENDIF
|
||||
@@ -154,7 +154,7 @@ STATIC FUNCTION HBRawVersion()
|
||||
|
||||
STATIC PROCEDURE Logo()
|
||||
|
||||
OutStd( "Harbour i18n .pot/.hbi file manager " + HBRawVersion() + HB_OSNewLine() +;
|
||||
OutStd( "Harbour i18n .pot/.hbl file manager " + HBRawVersion() + HB_OSNewLine() +;
|
||||
"Copyright (c) 2009, Przemyslaw Czerpak" + HB_OSNewLine() + ;
|
||||
"http://www.harbour-project.org/" + HB_OSNewLine() +;
|
||||
HB_OSNewLine() )
|
||||
@@ -167,13 +167,13 @@ STATIC PROCEDURE Syntax()
|
||||
OutStd( "Syntax: hbi18n -m | -g | -a [-o<outfile>] [-e] [-q] <files1[.pot] ...>" + HB_OSNewLine() + ;
|
||||
HB_OSNewLine() + ;
|
||||
" -m merge given .pot files" + HB_OSNewLine() + ;
|
||||
" -g generate .hbi file from given .pot files" + HB_OSNewLine() + ;
|
||||
" -g generate .hbl file from given .pot files" + HB_OSNewLine() + ;
|
||||
" -a add automatic translations to 1-st .pot file using" + HB_OSNewLine() + ;
|
||||
" translations from other .pot or .hbi files" + HB_OSNewLine() + ;
|
||||
" translations from other .pot or .hbl files" + HB_OSNewLine() + ;
|
||||
" -o<outfile> output file name" + HB_OSNewLine() + ;
|
||||
" default is first .pot file name with" + HB_OSNewLine() + ;
|
||||
" .po (merge) or .hbi extension" + HB_OSNewLine() + ;
|
||||
" -e do not strip empty translation rules from .hbi files" + HB_OSNewLine() + ;
|
||||
" .po (merge) or .hbl extension" + HB_OSNewLine() + ;
|
||||
" -e do not strip empty translation rules from .hbl files" + HB_OSNewLine() + ;
|
||||
" -q quiet mode" + HB_OSNewLine() + ;
|
||||
HB_OSNewLine() )
|
||||
|
||||
@@ -270,7 +270,7 @@ STATIC FUNCTION LoadFilesAsHash( aFiles )
|
||||
|
||||
FOR n := 1 TO Len( aFiles )
|
||||
hb_FNameSplit( aFiles[ n ],,, @cExt )
|
||||
IF Lower( cExt ) == ".hbi"
|
||||
IF Lower( cExt ) == ".hbl"
|
||||
cTrans := hb_memoRead( aFiles[ n ] )
|
||||
IF !HB_I18N_Check( cTrans )
|
||||
ErrorMsg( "Wrong file format: " + aFiles[ n ] )
|
||||
@@ -308,20 +308,20 @@ STATIC PROCEDURE Merge( aFiles, cFileOut )
|
||||
RETURN
|
||||
|
||||
|
||||
STATIC PROCEDURE GenHBI( aFiles, cFileOut, lEmpty )
|
||||
LOCAL cHBIBody
|
||||
STATIC PROCEDURE GenHBL( aFiles, cFileOut, lEmpty )
|
||||
LOCAL cHBLBody
|
||||
LOCAL pI18N
|
||||
|
||||
IF Empty( cFileOut )
|
||||
cFileOut := FileExt( aFiles[ 1 ], ".hbi", .T. )
|
||||
cFileOut := FileExt( aFiles[ 1 ], ".hbl", .T. )
|
||||
ELSE
|
||||
cFileOut := FileExt( cFileOut, ".hbi", .F. )
|
||||
cFileOut := FileExt( cFileOut, ".hbl", .F. )
|
||||
ENDIF
|
||||
|
||||
pI18N := __I18N_hashTable( __I18N_potArrayToHash( LoadFiles( aFiles ), ;
|
||||
lEmpty ) )
|
||||
cHBIBody := HB_I18N_SaveTable( pI18N )
|
||||
IF !hb_memoWrit( cFileOut, cHBIBody )
|
||||
cHBLBody := HB_I18N_SaveTable( pI18N )
|
||||
IF !hb_memoWrit( cFileOut, cHBLBody )
|
||||
ErrorMsg( "cannot create file: " + cFileOut )
|
||||
ENDIF
|
||||
|
||||
|
||||
@@ -11,5 +11,5 @@ hbmk2.prg
|
||||
-l{shared}hbcommon
|
||||
|
||||
hbmk2.${lng}.po
|
||||
-hbi=hbmk2.${lng}.hbi
|
||||
-hbl=hbmk2.${lng}.hbl
|
||||
-lng=hu_HU,pt_BR
|
||||
|
||||
@@ -179,8 +179,8 @@ msgstr "Hiba: Harbour k
|
||||
|
||||
#: hbmk2.prg:5758
|
||||
#, c-format
|
||||
msgid "list of languages to be replaced in ${lng} macros in .pot/.po filenames and output .hbi/.po filenames. Comma separared list:\\n-lng=en-EN,hu-HU,de"
|
||||
msgstr "nyelvek listája, amelyek a .pot/.po és .hbi/.po állományokban levõ ${lng} makrókba kerülnek behelyettesítésre. Vesszõvel elválasztott lista:\\n-lng=en-EN,hu-HU,de"
|
||||
msgid "list of languages to be replaced in ${lng} macros in .pot/.po filenames and output .hbl/.po filenames. Comma separared list:\\n-lng=en-EN,hu-HU,de"
|
||||
msgstr "nyelvek listája, amelyek a .pot/.po és .hbl/.po állományokban levõ ${lng} makrókba kerülnek behelyettesítésre. Vesszõvel elválasztott lista:\\n-lng=en-EN,hu-HU,de"
|
||||
|
||||
#: hbmk2.prg:2737
|
||||
#, c-format
|
||||
@@ -219,13 +219,13 @@ msgstr "'%1$s' .po f
|
||||
|
||||
#: hbmk2.prg:5345
|
||||
#, c-format
|
||||
msgid "Created .hbi file '%1$s'"
|
||||
msgstr "'%1$s' .hbi fájl létrehozva"
|
||||
msgid "Created .hbl file '%1$s'"
|
||||
msgstr "'%1$s' .hbl fájl létrehozva"
|
||||
|
||||
#: hbmk2.prg:5347
|
||||
#, c-format
|
||||
msgid "Created .hbi file '%1$s' for language(s): %2$s"
|
||||
msgstr "'%1$s' .hbi fájl létrehozva a következõ nyelv(ek)hez: %2$s"
|
||||
msgid "Created .hbl file '%1$s' for language(s): %2$s"
|
||||
msgstr "'%1$s' .hbl fájl létrehozva a következõ nyelv(ek)hez: %2$s"
|
||||
|
||||
#: hbmk2.prg:3339
|
||||
#, c-format
|
||||
@@ -434,8 +434,8 @@ msgstr "kapcsol
|
||||
|
||||
#: hbmk2.prg:5758
|
||||
#, c-format
|
||||
msgid "output .hbi filename. ${lng} macro is accepted in filename"
|
||||
msgstr "kimeneti .hbi fájlnév. ${lng} makró használható a fájlnévben"
|
||||
msgid "output .hbl filename. ${lng} macro is accepted in filename"
|
||||
msgstr "kimeneti .hbl fájlnév. ${lng} makró használható a fájlnévben"
|
||||
|
||||
#: hbmk2.prg:5187
|
||||
#, c-format
|
||||
@@ -719,8 +719,8 @@ msgstr "Hiba: C ford
|
||||
|
||||
#: hbmk2.prg:5661
|
||||
#, c-format
|
||||
msgid " hbmk [options] [<script[s]>] <src[s][.prg|.c|.obj|.o|.rc|.res|.po|.pot|.hbi]>"
|
||||
msgstr " hbmk [kapcsolók] [<parancsállomány[s]>] <forrás[.prg|.c|.obj|.o|.rc|.res|.po|.pot|.hbi]>"
|
||||
msgid " hbmk [options] [<script[s]>] <src[s][.prg|.c|.obj|.o|.rc|.res|.po|.pot|.hbl]>"
|
||||
msgstr " hbmk [kapcsolók] [<parancsállomány[s]>] <forrás[.prg|.c|.obj|.o|.rc|.res|.po|.pot|.hbl]>"
|
||||
|
||||
#: hbmk2.prg:2937
|
||||
#, c-format
|
||||
|
||||
@@ -35,7 +35,7 @@
|
||||
* bash script with similar purpose for gcc family.
|
||||
* entry point override method and detection code for gcc.
|
||||
* rtlink/blinker link script parsers.
|
||||
* POTMerge(), LoadPOTFilesAsHash(), GenHBI() and AutoTrans().
|
||||
* POTMerge(), LoadPOTFilesAsHash(), GenHBL() and AutoTrans().
|
||||
* (with local modifications by hbmk author)
|
||||
*
|
||||
* See COPYING for licensing terms.
|
||||
@@ -218,7 +218,7 @@ REQUEST hbmk_KEYW
|
||||
#define _HBMK_lMINIPO 42
|
||||
|
||||
#define _HBMK_aPO 43
|
||||
#define _HBMK_cHBI 44
|
||||
#define _HBMK_cHBL 44
|
||||
#define _HBMK_aLNG 45
|
||||
#define _HBMK_cPO 46
|
||||
|
||||
@@ -1153,7 +1153,7 @@ FUNCTION hbmk( aArgs, /* @ */ lPause, /* @ */ lUTF8 )
|
||||
s_cPROGNAME := NIL
|
||||
s_cFIRST := NIL
|
||||
hbmk[ _HBMK_aPO ] := {}
|
||||
hbmk[ _HBMK_cHBI ] := NIL
|
||||
hbmk[ _HBMK_cHBL ] := NIL
|
||||
hbmk[ _HBMK_cPO ] := NIL
|
||||
hbmk[ _HBMK_aLNG ] := {}
|
||||
hbmk[ _HBMK_aINSTPATH ] := {}
|
||||
@@ -1357,17 +1357,17 @@ FUNCTION hbmk( aArgs, /* @ */ lPause, /* @ */ lUTF8 )
|
||||
hbmk[ _HBMK_aLNG ] := ListToArray( cParam, "," )
|
||||
ENDIF
|
||||
|
||||
CASE Left( cParamL, 5 ) == "-hbi="
|
||||
CASE Left( cParamL, 5 ) == "-hbl="
|
||||
|
||||
hbmk[ _HBMK_cHBI ] := PathSepToTarget( hbmk, PathProc( SubStr( cParam, 6 ), FN_DirGet( aParam[ _PAR_cFileName ] ) ) )
|
||||
hbmk[ _HBMK_cHBL ] := PathSepToTarget( hbmk, PathProc( SubStr( cParam, 6 ), FN_DirGet( aParam[ _PAR_cFileName ] ) ) )
|
||||
|
||||
CASE Left( cParamL, 4 ) == "-po="
|
||||
|
||||
hbmk[ _HBMK_cPO ] := PathSepToTarget( hbmk, PathProc( SubStr( cParam, 5 ), FN_DirGet( aParam[ _PAR_cFileName ] ) ) )
|
||||
|
||||
CASE Left( cParamL, 5 ) == "-hbi"
|
||||
CASE Left( cParamL, 5 ) == "-hbl"
|
||||
|
||||
hbmk[ _HBMK_cHBI ] := ""
|
||||
hbmk[ _HBMK_cHBL ] := ""
|
||||
|
||||
CASE Left( cParamL, 6 ) == "-main="
|
||||
|
||||
@@ -1658,9 +1658,9 @@ FUNCTION hbmk( aArgs, /* @ */ lPause, /* @ */ lUTF8 )
|
||||
AAdd( hbmk[ _HBMK_aPO ], PathSepToTarget( hbmk, cParam ) )
|
||||
NEXT
|
||||
|
||||
CASE FN_ExtGet( cParamL ) == ".hbi"
|
||||
CASE FN_ExtGet( cParamL ) == ".hbl"
|
||||
|
||||
hbmk[ _HBMK_cHBI ] := PathSepToTarget( hbmk, PathProc( cParam, aParam[ _PAR_cFileName ] ) )
|
||||
hbmk[ _HBMK_cHBL ] := PathSepToTarget( hbmk, PathProc( cParam, aParam[ _PAR_cFileName ] ) )
|
||||
|
||||
OTHERWISE
|
||||
|
||||
@@ -3092,8 +3092,8 @@ FUNCTION hbmk( aArgs, /* @ */ lPause, /* @ */ lUTF8 )
|
||||
ENDIF
|
||||
ENDIF
|
||||
|
||||
IF Len( hbmk[ _HBMK_aPO ] ) > 0 .AND. hbmk[ _HBMK_cHBI ] != NIL .AND. ! s_lCLEAN
|
||||
MakeHBI( hbmk, hbmk[ _HBMK_cHBI ] )
|
||||
IF Len( hbmk[ _HBMK_aPO ] ) > 0 .AND. hbmk[ _HBMK_cHBL ] != NIL .AND. ! s_lCLEAN
|
||||
MakeHBL( hbmk, hbmk[ _HBMK_cHBL ] )
|
||||
ENDIF
|
||||
|
||||
IF Len( s_aRESSRC_TODO ) > 0 .AND. ! Empty( cBin_Res ) .AND. ! s_lCLEAN
|
||||
@@ -5446,9 +5446,9 @@ STATIC PROCEDURE UpdatePO( hbmk, aPOTIN )
|
||||
|
||||
RETURN
|
||||
|
||||
/* .hbi generation */
|
||||
/* .hbl generation */
|
||||
|
||||
STATIC PROCEDURE MakeHBI( hbmk, cHBI )
|
||||
STATIC PROCEDURE MakeHBL( hbmk, cHBL )
|
||||
LOCAL cPO
|
||||
LOCAL tPO
|
||||
LOCAL cLNG
|
||||
@@ -5462,16 +5462,16 @@ STATIC PROCEDURE MakeHBI( hbmk, cHBI )
|
||||
IF hbmk[ _HBMK_lDEBUGI18N ]
|
||||
hbmk_OutStd( hbmk, hb_StrFormat( "po: in: %1$s", ArrayToList( hbmk[ _HBMK_aPO ] ) ) )
|
||||
ENDIF
|
||||
IF Empty( cHBI )
|
||||
cHBI := FN_NameGet( hbmk[ _HBMK_aPO ][ 1 ] )
|
||||
IF Empty( cHBL )
|
||||
cHBL := FN_NameGet( hbmk[ _HBMK_aPO ][ 1 ] )
|
||||
ENDIF
|
||||
IF Empty( FN_ExtGet( cHBI ) )
|
||||
cHBI := FN_ExtSet( cHBI, ".hbi" )
|
||||
IF Empty( FN_ExtGet( cHBL ) )
|
||||
cHBL := FN_ExtSet( cHBL, ".hbl" )
|
||||
ENDIF
|
||||
|
||||
FOR EACH cLNG IN iif( Empty( hbmk[ _HBMK_aLNG ] ) .OR. !( _LNG_MARKER $ cHBI ), { _LNG_MARKER }, hbmk[ _HBMK_aLNG ] )
|
||||
FOR EACH cLNG IN iif( Empty( hbmk[ _HBMK_aLNG ] ) .OR. !( _LNG_MARKER $ cHBL ), { _LNG_MARKER }, hbmk[ _HBMK_aLNG ] )
|
||||
tLNG := NIL
|
||||
hb_FGetDateTime( StrTran( cHBI, _LNG_MARKER, cLNG ), @tLNG )
|
||||
hb_FGetDateTime( StrTran( cHBL, _LNG_MARKER, cLNG ), @tLNG )
|
||||
lUpdateNeeded := .F.
|
||||
aPO_TODO := {}
|
||||
FOR EACH cPO IN hbmk[ _HBMK_aPO ]
|
||||
@@ -5482,19 +5482,19 @@ STATIC PROCEDURE MakeHBI( hbmk, cHBI )
|
||||
NEXT
|
||||
IF lUpdateNeeded
|
||||
IF hbmk[ _HBMK_lDEBUGI18N ]
|
||||
hbmk_OutStd( hbmk, hb_StrFormat( "po: %1$s -> %2$s", ArrayToList( aPO_TODO ), StrTran( cHBI, _LNG_MARKER, cLNG ) ) )
|
||||
hbmk_OutStd( hbmk, hb_StrFormat( "po: %1$s -> %2$s", ArrayToList( aPO_TODO ), StrTran( cHBL, _LNG_MARKER, cLNG ) ) )
|
||||
ENDIF
|
||||
GenHBI( hbmk, aPO_TODO, StrTran( cHBI, _LNG_MARKER, cLNG ) )
|
||||
GenHBL( hbmk, aPO_TODO, StrTran( cHBL, _LNG_MARKER, cLNG ) )
|
||||
AAdd( aNew, cLNG )
|
||||
ENDIF
|
||||
NEXT
|
||||
ENDIF
|
||||
|
||||
IF ! Empty( aNew )
|
||||
IF Empty( hbmk[ _HBMK_aLNG ] ) .OR. !( _LNG_MARKER $ cHBI )
|
||||
hbmk_OutStd( hbmk, hb_StrFormat( I_( "Created .hbi file '%1$s'" ), cHBI ) )
|
||||
IF Empty( hbmk[ _HBMK_aLNG ] ) .OR. !( _LNG_MARKER $ cHBL )
|
||||
hbmk_OutStd( hbmk, hb_StrFormat( I_( "Created .hbl file '%1$s'" ), cHBL ) )
|
||||
ELSE
|
||||
hbmk_OutStd( hbmk, hb_StrFormat( I_( "Created .hbi file '%1$s' for language(s): %2$s" ), cHBI, ArrayToList( aNew, "," ) ) )
|
||||
hbmk_OutStd( hbmk, hb_StrFormat( I_( "Created .hbl file '%1$s' for language(s): %2$s" ), cHBL, ArrayToList( aNew, "," ) ) )
|
||||
ENDIF
|
||||
ENDIF
|
||||
|
||||
@@ -5576,16 +5576,16 @@ STATIC PROCEDURE AutoTrans( hbmk, cFileIn, aFiles, cFileOut )
|
||||
|
||||
RETURN
|
||||
|
||||
STATIC FUNCTION GenHBI( hbmk, aFiles, cFileOut, lEmpty )
|
||||
LOCAL cHBIBody
|
||||
STATIC FUNCTION GenHBL( hbmk, aFiles, cFileOut, lEmpty )
|
||||
LOCAL cHBLBody
|
||||
LOCAL pI18N
|
||||
LOCAL aTrans := LoadPOTFiles( hbmk, aFiles, NIL, .F. )
|
||||
LOCAL lRetVal := .F.
|
||||
|
||||
IF ISARRAY( aTrans )
|
||||
pI18N := __i18n_hashTable( __i18n_potArrayToHash( aTrans, lEmpty ) )
|
||||
cHBIBody := hb_i18n_SaveTable( pI18N )
|
||||
IF hb_MemoWrit( cFileOut, cHBIBody )
|
||||
cHBLBody := hb_i18n_SaveTable( pI18N )
|
||||
IF hb_MemoWrit( cFileOut, cHBLBody )
|
||||
lRetVal := .T.
|
||||
ELSE
|
||||
hbmk_OutErr( hbmk, hb_StrFormat( I_( "Error: Cannot create file: %1$s" ), cFileOut ) )
|
||||
@@ -5770,7 +5770,7 @@ STATIC PROCEDURE SetUILang( hbmk )
|
||||
IF hbmk[ _HBMK_cUILNG ] == "en-EN"
|
||||
hb_i18n_set( NIL )
|
||||
ELSE
|
||||
tmp := "${hb_root}hbmk2.${lng}.hbi"
|
||||
tmp := "${hb_root}hbmk2.${lng}.hbl"
|
||||
tmp := StrTran( tmp, "${hb_root}", PathSepToSelf( DirAddPathSep( hb_DirBase() ) ) )
|
||||
tmp := StrTran( tmp, "${lng}", StrTran( hbmk[ _HBMK_cUILNG ], "-", "_" ) )
|
||||
hb_i18n_set( iif( hb_i18n_check( tmp := hb_MemoRead( tmp ) ), hb_i18n_restoretable( tmp ), NIL ) )
|
||||
@@ -5812,7 +5812,7 @@ STATIC PROCEDURE ShowHelp( hbmk, lLong )
|
||||
LOCAL aText_Basic := {;
|
||||
I_( "Syntax:" ),;
|
||||
"",;
|
||||
I_( " hbmk [options] [<script[s]>] <src[s][.prg|.c|.obj|.o|.rc|.res|.po|.pot|.hbi]>" ),;
|
||||
I_( " hbmk [options] [<script[s]>] <src[s][.prg|.c|.obj|.o|.rc|.res|.po|.pot|.hbl]>" ),;
|
||||
"",;
|
||||
I_( "Options:" ) }
|
||||
|
||||
@@ -5883,8 +5883,8 @@ STATIC PROCEDURE ShowHelp( hbmk, lLong )
|
||||
{ "-clean" , I_( "clean (in incremental build mode)" ) },;
|
||||
{ "-workdir=<dir>" , hb_StrFormat( I_( "working directory for incremental build mode\n(default: %1$s/arch/comp)" ), _WORKDIR_BASE_ ) },;
|
||||
NIL,;
|
||||
{ "-hbi[=<output>]" , I_( "output .hbi filename. ${lng} macro is accepted in filename" ) },;
|
||||
{ "-lng=<languages>" , I_( "list of languages to be replaced in ${lng} macros in .pot/.po filenames and output .hbi/.po filenames. Comma separared list:\n-lng=en-EN,hu-HU,de" ) },;
|
||||
{ "-hbl[=<output>]" , I_( "output .hbl filename. ${lng} macro is accepted in filename" ) },;
|
||||
{ "-lng=<languages>" , I_( "list of languages to be replaced in ${lng} macros in .pot/.po filenames and output .hbl/.po filenames. Comma separared list:\n-lng=en-EN,hu-HU,de" ) },;
|
||||
{ "-po=<output>" , I_( "create/update .po file from source. Merge it with previous .po file of the same name" ) },;
|
||||
{ "-[no]minipo" , I_( "don't (or do) add Harbour version number and source file reference to .po (default: add them)" ) },;
|
||||
{ "-rebuildpo" , I_( "recreate .po file, thus removing all obsolete entries in it" ) },;
|
||||
|
||||
@@ -469,7 +469,7 @@ msgstr ""
|
||||
|
||||
#: hbmk2.prg:5294
|
||||
#, c-format
|
||||
msgid " -hbi[=<output>] output .hbi filename. ${lng} macro is accepted in filename"
|
||||
msgid " -hbl[=<output>] output .hbl filename. ${lng} macro is accepted in filename"
|
||||
msgstr ""
|
||||
|
||||
#: hbmk2.prg:5294
|
||||
@@ -479,7 +479,7 @@ msgstr ""
|
||||
|
||||
#: hbmk2.prg:5294
|
||||
#, c-format
|
||||
msgid " filenames and output .hbi filenames. Comma separared list:"
|
||||
msgid " filenames and output .hbl filenames. Comma separared list:"
|
||||
msgstr ""
|
||||
|
||||
#: hbmk2.prg:5294
|
||||
@@ -809,7 +809,7 @@ msgstr ""
|
||||
|
||||
#: hbmk2.prg:5180
|
||||
#, c-format
|
||||
msgid " hbmk [options] [<script[s]>] <src[s][.prg|.c|.obj|.o|.rc|.res|.pot|.hbi]>"
|
||||
msgid " hbmk [options] [<script[s]>] <src[s][.prg|.c|.obj|.o|.rc|.res|.pot|.hbl]>"
|
||||
msgstr ""
|
||||
|
||||
#: hbmk2.prg:5450 hbmk2.prg:5644
|
||||
@@ -984,7 +984,7 @@ msgstr ""
|
||||
|
||||
#: hbmk2.prg:5758
|
||||
#, c-format
|
||||
msgid "list of languages to be replaced in ${lng} macros in .pot/.po filenames and output .hbi/.po filenames. Comma separared list:\\n-lng=en-EN,hu-HU,de"
|
||||
msgid "list of languages to be replaced in ${lng} macros in .pot/.po filenames and output .hbl/.po filenames. Comma separared list:\\n-lng=en-EN,hu-HU,de"
|
||||
msgstr ""
|
||||
|
||||
#: hbmk2.prg:3532
|
||||
@@ -1014,12 +1014,12 @@ msgstr ""
|
||||
|
||||
#: hbmk2.prg:5345
|
||||
#, c-format
|
||||
msgid "Created .hbi file '%1$s'"
|
||||
msgid "Created .hbl file '%1$s'"
|
||||
msgstr ""
|
||||
|
||||
#: hbmk2.prg:5347
|
||||
#, c-format
|
||||
msgid "Created .hbi file '%1$s' for language(s): %2$s"
|
||||
msgid "Created .hbl file '%1$s' for language(s): %2$s"
|
||||
msgstr ""
|
||||
|
||||
#: hbmk2.prg:3339
|
||||
@@ -1224,7 +1224,7 @@ msgstr ""
|
||||
|
||||
#: hbmk2.prg:5758
|
||||
#, c-format
|
||||
msgid "output .hbi filename. ${lng} macro is accepted in filename"
|
||||
msgid "output .hbl filename. ${lng} macro is accepted in filename"
|
||||
msgstr ""
|
||||
|
||||
#: hbmk2.prg:5187
|
||||
@@ -1494,7 +1494,7 @@ msgstr ""
|
||||
|
||||
#: hbmk2.prg:5661
|
||||
#, c-format
|
||||
msgid " hbmk [options] [<script[s]>] <src[s][.prg|.c|.obj|.o|.rc|.res|.po|.pot|.hbi]>"
|
||||
msgid " hbmk [options] [<script[s]>] <src[s][.prg|.c|.obj|.o|.rc|.res|.po|.pot|.hbl]>"
|
||||
msgstr ""
|
||||
|
||||
#: hbmk2.prg:2937
|
||||
|
||||
Reference in New Issue
Block a user