[Instantobjects-cvscommit] SF.net SVN: instantobjects:[902] trunk/Source/Core/InstantClasses.pas

[<na...@us...>]

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;