paweld/lazarus-ccr
1
0
Fork 0
Code Issues Pull Requests Packages Projects Releases Wiki Activity

Delete "_" if it is the last character of the generated name.

Browse Source 
git-svn-id: https://svn.code.sf.net/p/lazarus-ccr/svn@1317 8e941d3f-bd1b-0410-a28a-d453659cc2b4
This commit is contained in:
inoussa 2010-09-08 14:00:31 +00:00
parent 61c6016709
commit f8809ed35c
1 changed files with 2 additions and 0 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

2
wst/trunk/ws_helper/parserutils.pas
View File

@ -150,6 +150,8 @@ begin
end;
end;
end;
if (Length(Result) > 1) and (Result[Length(Result)] = '_') then
Delete(Result,Length(Result),1);
end;
end;