From ad9881e41f56b391773a69a4c3863e0554b2fe7f Mon Sep 17 00:00:00 2001
From: ivost <ivost@3ad0048d-3df7-0310-abae-a5850022a9f2>
Date: Fri, 4 Feb 2011 19:26:48 +0000
Subject: * fixed bug with xmlxsdparser.pas (typo). It was introduced by r16873

git-svn-id: http://svn.freepascal.org/svn/fpc/trunk@16878 3ad0048d-3df7-0310-abae-a5850022a9f2
---
 packages/libxml/src/xmlxsdparser.pas | 13 +++++++++----
 1 file changed, 9 insertions(+), 4 deletions(-)

(limited to 'packages/libxml')

diff --git a/packages/libxml/src/xmlxsdparser.pas b/packages/libxml/src/xmlxsdparser.pas
index 847cf9a284..9a2750e7ab 100644
--- a/packages/libxml/src/xmlxsdparser.pas
+++ b/packages/libxml/src/xmlxsdparser.pas
@@ -24,10 +24,15 @@ resourcestring
   SXsdParserError = 'parsing "%s" as "%s" failed';
 
 type
+{$IFDEF MSWINDOWS}
+  PBoolean = System.PBoolean;
+  // PBoolean is redefined by windows unit, so redefine it here again!
+{$ENDIF}
+
   TXsdTimezoneType = (
-    tzUNKNOWN,
-    tzLOCAL,
-    tzUTC
+    tzUnknown,
+    tzLocal,
+    tzUtc
   );
 
   PXsdTimezone = ^TXsdTimezone;
@@ -422,7 +427,7 @@ begin
   case GetTimeZoneInformation(TZInfo) of
     1: Offset := -TZInfo.Bias - TZInfo.StandardBias;
     2: Offset := -TZInfo.Bias - TZInfo.DaylightBias;
-    else Result.Kind := tz;
+    else Result.Kind := tzUnknown;
   end;
 {$ENDIF}
   Result.Hour := Offset div 60;
-- 
cgit v1.2.1