diff --git a/harbour/ChangeLog b/harbour/ChangeLog index 2a20e2df90..394305b8b7 100644 --- a/harbour/ChangeLog +++ b/harbour/ChangeLog @@ -16,6 +16,11 @@ The license applies to all entries newer than 2009-04-28. */ +2011-09-24 11:49 UTC+0200 Viktor Szakats (harbour.01 syenar.hu) + * contrib/hbmzip/mzip.c + ! HB_UNZIPFILEINFO(): date returned was off by one month. + Report and fix by Juan Galvez. + 2011-09-24 11:10 UTC+0200 Przemyslaw Czerpak (druzus/at/priv.onet.pl) * harbour/include/hbtrace.h * harbour/src/common/hbtrace.c diff --git a/harbour/contrib/hbmzip/mzip.c b/harbour/contrib/hbmzip/mzip.c index 4c87517657..63759d4e2b 100644 --- a/harbour/contrib/hbmzip/mzip.c +++ b/harbour/contrib/hbmzip/mzip.c @@ -472,7 +472,7 @@ HB_FUNC( HB_UNZIPFILEINFO ) szFileName[ HB_PATH_MAX - 1 ] = '\0'; hb_storc( szFileName, 2 ); - lJulian = hb_dateEncode( ufi.tmu_date.tm_year, ufi.tmu_date.tm_mon, + lJulian = hb_dateEncode( ufi.tmu_date.tm_year, ufi.tmu_date.tm_mon + 1, ufi.tmu_date.tm_mday ); lMillisec = hb_timeEncode( ufi.tmu_date.tm_hour, ufi.tmu_date.tm_min, ufi.tmu_date.tm_sec, 0 );