diff options
| author | sergei <sergei@3ad0048d-3df7-0310-abae-a5850022a9f2> | 2011-01-23 15:52:47 +0000 |
|---|---|---|
| committer | sergei <sergei@3ad0048d-3df7-0310-abae-a5850022a9f2> | 2011-01-23 15:52:47 +0000 |
| commit | 4d72d75d728aa263b7011f7347f1401f7458cb1d (patch) | |
| tree | 12ae8c067cd5e4bd546eb6a506c2da320a05ef19 /packages/fcl-xml | |
| parent | 2d8963dd6469a4a6b1d60fc6b9e97d8d2ef6661f (diff) | |
| download | fpc-4d72d75d728aa263b7011f7347f1401f7458cb1d.tar.gz | |
* xmlcfg.pp, changed 'exit' to 'break' so that function won't exit without result assigned, Mantis #18589
git-svn-id: http://svn.freepascal.org/svn/fpc/trunk@16803 3ad0048d-3df7-0310-abae-a5850022a9f2
Diffstat (limited to 'packages/fcl-xml')
| -rw-r--r-- | packages/fcl-xml/src/xmlcfg.pp | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/packages/fcl-xml/src/xmlcfg.pp b/packages/fcl-xml/src/xmlcfg.pp index c359be5017..01a860ef2f 100644 --- a/packages/fcl-xml/src/xmlcfg.pp +++ b/packages/fcl-xml/src/xmlcfg.pp @@ -354,7 +354,7 @@ begin if not (s[i] in AllowedChars) then begin EscapingNecessary := True; - exit; + break; end; end; |