diff options
| author | ivost <ivost@3ad0048d-3df7-0310-abae-a5850022a9f2> | 2009-03-21 11:34:44 +0000 |
|---|---|---|
| committer | ivost <ivost@3ad0048d-3df7-0310-abae-a5850022a9f2> | 2009-03-21 11:34:44 +0000 |
| commit | 76718e6d224b6e9883c34178159324faa6c54b93 (patch) | |
| tree | 3ce3247ec20367638292b6a7358d054a684335f8 /packages/libxml | |
| parent | f0d31a663a8d8273cf2cc91b1760de26155c8cbf (diff) | |
| download | fpc-76718e6d224b6e9883c34178159324faa6c54b93.tar.gz | |
fixed bug: xsdTryNextString returned allways true
git-svn-id: http://svn.freepascal.org/svn/fpc/trunk@12937 3ad0048d-3df7-0310-abae-a5850022a9f2
Diffstat (limited to 'packages/libxml')
| -rw-r--r-- | packages/libxml/src/xmlxsd.pas | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/packages/libxml/src/xmlxsd.pas b/packages/libxml/src/xmlxsd.pas index 1d15a1b383..6be8fcd7bc 100644 --- a/packages/libxml/src/xmlxsd.pas +++ b/packages/libxml/src/xmlxsd.pas @@ -495,7 +495,7 @@ end; function xsdTryParseString(Chars: xmlCharPtr; out Value: String): Boolean; begin Value := PChar(Chars); - Result := True; + Result := Assigned(Chars); end; function xsdTryParseBoolean(Chars: xmlCharPtr; out Value: Boolean): Boolean; |