paweld/fpc
1
0
Fork 0
mirror of https://gitlab.com/freepascal.org/fpc/source.git synced 2025-04-08 09:28:19 +02:00
Code Issues Packages Projects Releases Wiki Activity

* Replace strange characters with ! instead of dropping them (dropping causes duplicate labels)

Browse Source 
git-svn-id: trunk@16285 -
This commit is contained in:
michael 2010-11-01 09:55:54 +00:00
parent 747b93b7ec
commit 03774ca2c3
1 changed files with 3 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

4
utils/fpdoc/dw_latex.pp
View File

@ -187,7 +187,9 @@ begin
SetLength(Result, 0);
for i := 1 to Length(S) do
If not (S[i] in ['&','{','}','#','_','$','%','''','~','^', '\']) then
Result := Result + S[i];
Result := Result + S[i]
else
Result:=result+'!'
end;