Explorar o código

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 -

florian %!s(int64=20) %!d(string=hai) anos
pai
achega
d3db566621
Modificáronse 1 ficheiros con 1 adicións e 1 borrados
  1. 1 1
      fcl/xml/xmlread.pp

+ 1 - 1
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