diff --git a/ChangeLog b/ChangeLog
index 17149c5e..78d0771a 100644
--- a/ChangeLog
+++ b/ChangeLog
@@ -1,3 +1,9 @@
+Mon Mar 31 13:19:04 CEST 2003 Daniel Veillard <daniel@veillard.com>
+
+	* xmlschemastypes.c: fixed date comparison to handle the tzo
+	  The only failures left are disagreements on Notations and
+	  '+1' not being allowed for ulong, uint, ushort and ubyte.
+
 Mon Mar 31 12:11:47 CEST 2003 Daniel Veillard <daniel@veillard.com>
 
 	* xmlschemastypes.c: fixed gMonth parsing routine accordingly
diff --git a/xmlschemastypes.c b/xmlschemastypes.c
index 79cf8334..4a659a39 100644
--- a/xmlschemastypes.c
+++ b/xmlschemastypes.c
@@ -2495,7 +2495,9 @@ _xmlSchemaDateCastYMToDays (const xmlSchemaValPtr dt)
  */
 #define TIME_TO_NUMBER(dt)                              \
     ((double)((dt->value.date.hour * SECS_PER_HOUR) +   \
-              (dt->value.date.min * SECS_PER_MIN)) + dt->value.date.sec)
+              (dt->value.date.min * SECS_PER_MIN) +	\
+              (dt->value.date.tzo * SECS_PER_MIN)) +	\
+               dt->value.date.sec)
 
 /**
  * xmlSchemaCompareDates: