fix: include $$ in list of non-allowed delimiters

This commit is contained in:
Ansgar Becker
2026-01-12 15:05:54 +01:00
parent 3905955dfa
commit 549e2629f4

View File

@@ -5345,7 +5345,7 @@ begin
Msg := _('Empty value.')
else begin
rx := TRegExpr.Create;
rx.Expression := '(/\*|--|#|\''|\"|`)';
rx.Expression := '(/\*|--|#|\''|\"|`|\$\$)';
if rx.Exec(Value) then
Msg := _('Start-of-comment tokens or string literal markers are not allowed.')
end;