fivedev/harbour-core
1
0
Fork 0
Code Issues Pull Requests Actions Packages Projects Releases Wiki Activity

2009-11-04 20:04 UTC+0100 Przemyslaw Czerpak (druzus/at/priv.onet.pl)

Browse Source 
* harbour/utils/hbmk2/hbmk2.prg
    ! do not overwrite file extensions set in .clp file when checking
      dependencies in incremental mode
This commit is contained in:
Przemyslaw Czerpak
2009-11-04 19:05:01 +00:00
parent 0357d329c2
commit 8eb52166ad
2 changed files with 16 additions and 1 deletions
Download Patch File Download Diff File Expand all files Collapse all files

5
harbour/ChangeLog
View File

@@ -17,6 +17,11 @@
past entries belonging to author(s): Viktor Szakats.
*/
2009-11-04 20:04 UTC+0100 Przemyslaw Czerpak (druzus/at/priv.onet.pl)
* harbour/utils/hbmk2/hbmk2.prg
! do not overwrite file extensions set in .clp file when checking
dependencies in incremental mode
2009-11-04 19:51 UTC+0100 Przemyslaw Czerpak (druzus/at/priv.onet.pl)
* harbour/utils/hbmk2/hbmk2.prg
! fixed incremental mode for @.clp files.

12
harbour/utils/hbmk2/hbmk2.prg
View File

@@ -4920,7 +4920,7 @@ STATIC FUNCTION clpfile_read( cFileName )
aFiles := hb_aTokens( cFileBody,, .t. )
FOR EACH cFile IN aFiles
cFile := FN_ExtSet( StrTran( cFile, '"' ), ".prg" )
cFile := FN_ExtDef( StrTran( cFile, '"' ), ".prg" )
NEXT
RETURN aFiles
@@ -5624,6 +5624,16 @@ STATIC FUNCTION FN_ExtGet( cFileName )
RETURN cExt
STATIC FUNCTION FN_ExtDef( cFileName, cDefExt )
LOCAL cDir, cName, cExt
hb_FNameSplit( cFileName, @cDir, @cName, @cExt )
IF Empty( cExt )
cExt := cDefExt
ENDIF
RETURN hb_FNameMerge( cDir, cName, cExt )
STATIC FUNCTION FN_ExtSet( cFileName, cExt )
LOCAL cDir, cName