diff --git a/harbour/ChangeLog b/harbour/ChangeLog index f6889157ba..017b96f7b6 100644 --- a/harbour/ChangeLog +++ b/harbour/ChangeLog @@ -17,6 +17,11 @@ past entries belonging to author(s): Viktor Szakats. */ +2010-04-23 23:05 UTC-0800 Pritpal Bedi (pritpal@vouchcac.com) + * contrib/hbide/idemisc.prg + ! Fixed to store original filename without case convertion inside .hbp. + It fixes issue on linux if source file name contains mix case. + 2010-04-23 17:12 UTC-0800 Pritpal Bedi (pritpal@vouchcac.com) * contrib/gtwvg/wvgpushb.prg ! Fixed an ommitted SETGET keyword causing demowvg/demoxbp defunct. diff --git a/harbour/contrib/hbide/idemisc.prg b/harbour/contrib/hbide/idemisc.prg index b80a0d03f3..7d680d4143 100644 --- a/harbour/contrib/hbide/idemisc.prg +++ b/harbour/contrib/hbide/idemisc.prg @@ -1571,8 +1571,8 @@ FUNCTION hbide_stripRoot( cRoot, cPath ) ENDIF cLRoot := hbide_pathNormalized( cRoot, .t. ) - cLPath := hbide_pathNormalized( cPath, .t. ) - IF left( cLPath, len( cLRoot ) ) == cLRoot + cLPath := hbide_pathNormalized( cPath, .f. ) + IF left( lower( cLPath ), len( cLRoot ) ) == cLRoot cP := substr( cLPath, len( cRoot ) + 1 ) RETURN cP ENDIF