From d3db566621d473707fc5c5b2d6dcc9a4d348beea Mon Sep 17 00:00:00 2001
From: florian <florian@freepascal.org>
Date: Tue, 18 Oct 2005 20:57:18 +0000
Subject: [PATCH] Merged revisions 1483 via svnmerge from
 http://svn.freepascal.org/svn/fpc/trunk

r1483 (florian)
* fixed copy&paste error (bug 4289)

git-svn-id: branches/fixes_2_0@1484 -
---
 fcl/xml/xmlread.pp | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/fcl/xml/xmlread.pp b/fcl/xml/xmlread.pp
index 912f0178d1..ca4e289cef 100644
--- a/fcl/xml/xmlread.pp
+++ b/fcl/xml/xmlread.pp
@@ -686,7 +686,7 @@ begin
         Inc(buf);
         if not (CheckFor('yes''') or CheckFor('no''')) then
           RaiseExc('Expected ''yes'' or ''no''');
-      end else if buf[0] = '''' then
+      end else if buf[0] = '"' then
       begin
         Inc(buf);
         if not (CheckFor('yes"') or CheckFor('no"')) then