romfast/foxbin2prg
1
0
Fork 0
Code Issues Pull Requests Actions Packages Projects Releases Wiki Activity

- Ajustes de tests unitarios para comprobar la funcionalidad de la evaluación de configuración con herencia por directorio

Browse Source
This commit is contained in:
fdbozzo
2015-04-02 15:59:31 +02:00
parent eacdb71373
commit 8dc1452349
2 changed files with 158 additions and 10 deletions
Download Patch File Download Diff File Expand all files Collapse all files

6
foxbin2prg.prg
View File

@@ -1578,16 +1578,16 @@ DEFINE CLASS c_foxbin2prg AS SESSION
IF .l_Main_CFG_Loaded AND NOT EMPTY(tc_InputFile) AND NOT tcInputFile_Type == C_FILETYPE_QUERYSUPPORT THEN
IF tcInputFile_Type == C_FILETYPE_DIRECTORY THEN
lcConfigFile = FORCEPATH( 'foxbin2prg.cfg', tc_InputFile )
lcConfigFile = FULLPATH( 'foxbin2prg.cfg', ADDBS(tc_InputFile) )
ELSE
lcConfigFile = FORCEPATH( 'foxbin2prg.cfg', JUSTPATH(tc_InputFile) )
lcConfigFile = FULLPATH( 'foxbin2prg.cfg', tc_InputFile )
ENDIF
ENDIF
lo_Configuration = .o_Configuration
.n_CFG_Actual = 0
.l_CFG_CachedAccess = .F.
lc_CFG_Path = UPPER( JUSTPATH( lcConfigFile ) )
lc_CFG_Path = UPPER( JUSTPATH( FULLPATH( lcConfigFile ) ) )
lo_CFG = THIS
*-- B<>squeda del CFG del PATH indicado en la cach<63>