mirror of
https://gitlab.com/freepascal.org/lazarus/lazarus.git
synced 2025-06-05 17:58:19 +02:00
parent
a0ce649f8c
commit
171eed83db
@ -47,7 +47,7 @@ begin
|
||||
s := copy(s, 2, length(s)-2)
|
||||
else
|
||||
if (s[1] = '''') and (s[length(s)] = '''') then
|
||||
s := copy(s, 2, length(s)-2)
|
||||
s := copy(s, 2, length(s)-2);
|
||||
|
||||
if s = '' then
|
||||
exit;
|
||||
|
Loading…
Reference in New Issue
Block a user