Revision: 902
http://instantobjects.svn.sourceforge.net/instantobjects/revision/?rev=902&view=rev
Author: nandod
Date: 2010-09-11 16:44:56 +0000 (Sat, 11 Sep 2010)
Log Message:
-----------
* Unicode-related fix for XML processing.
Modified Paths:
--------------
trunk/Source/Core/InstantClasses.pas
Modified: trunk/Source/Core/InstantClasses.pas
===================================================================
--- trunk/Source/Core/InstantClasses.pas 2010-09-11 16:27:50 UTC (rev 901)
+++ trunk/Source/Core/InstantClasses.pas 2010-09-11 16:44:56 UTC (rev 902)
@@ -1717,7 +1717,7 @@
procedure TInstantXMLProcessor.SkipBlanks;
begin
- while InstantCharInSet(PeekChar, [#1..#32]) do
+ while InstantCharInSet(PeekChar, [#0..#32]) do
ReadChar;
end;
|
