From 3d9c978e778db09b6b74896b75f48bffb43bc18a Mon Sep 17 00:00:00 2001 From: "David G. Holm" Date: Thu, 3 Jun 1999 18:37:56 +0000 Subject: [PATCH] See ChangeLog entry 19990603-13:30 EDT David G. Holm --- harbour/ChangeLog | 6 ++++++ harbour/source/rtl/dates.c | 2 +- 2 files changed, 7 insertions(+), 1 deletion(-) diff --git a/harbour/ChangeLog b/harbour/ChangeLog index dd002b4e6a..6a4b961388 100644 --- a/harbour/ChangeLog +++ b/harbour/ChangeLog @@ -1,3 +1,9 @@ +19990603-13:30 EDT David G. Holm + Thanks go to Jose Lalin + * source/rtl/dates.c + - localtime() returns tm_year with 1900 already subtracted from it, + so it is necessary to add 1900 back when formatting the date. + 19990603-18:30 CET Eddie Runia * source/rtl/classes.c; source/rtl/tclass.prg; source/rtl/arrays.c * include/ctoharb.h; include/extend.h diff --git a/harbour/source/rtl/dates.c b/harbour/source/rtl/dates.c index 90547ab16e..2567c0da93 100644 --- a/harbour/source/rtl/dates.c +++ b/harbour/source/rtl/dates.c @@ -440,7 +440,7 @@ HARBOUR DATE( void ) time(&t); oTime = localtime(&t); - sprintf(szTime, "%04d%02d%02d", oTime->tm_year, oTime->tm_mon + 1, + sprintf(szTime, "%04d%02d%02d", oTime->tm_year + 1900, oTime->tm_mon + 1, oTime->tm_mday); _retds(szTime); }