diff --git a/harbour/ChangeLog b/harbour/ChangeLog index da26976671..1d88dc9b58 100644 --- a/harbour/ChangeLog +++ b/harbour/ChangeLog @@ -16,6 +16,12 @@ The license applies to all entries newer than 2009-04-28. */ +2011-02-14 17:19 UTC+0100 Viktor Szakats (harbour.01 syenar.hu) + * src/rtl/hbfilehi.prg + ! Silly cut&paste typo causing major problem in some cases + in HB_PATHNORMALIZE(). (in 2011-02-11 12:04 UTC+0100 Viktor Szakats) + Thanks Teo for reporting the darwin/gcc problem it caused. + 2011-02-14 16:27 UTC+0100 Viktor Szakats (harbour.01 syenar.hu) * contrib/hbtip/utils.c * contrib/hbtip/hbtip.hbx diff --git a/harbour/src/rtl/hbfilehi.prg b/harbour/src/rtl/hbfilehi.prg index c6d9c589b0..e0d4377e4e 100644 --- a/harbour/src/rtl/hbfilehi.prg +++ b/harbour/src/rtl/hbfilehi.prg @@ -79,7 +79,6 @@ FUNCTION hb_PathNormalize( cPath ) ( cDir:__enumIndex() > 2 .OR. ; ( cDir:__enumIndex() == 2 .AND. ! Empty( aDir[ 1 ] ) ) ) ) hb_ADel( aDir, cDir:__enumIndex(), .T. ) - hb_ADel( aDir, cDir:__enumIndex(), .T. ) ELSEIF !( cDir == ".." ) .AND. ; ! Empty( cDir ) .AND. ; ! _ISDRIVESPEC( cDir )