forks
/
dexed
mirror of https://gitlab.com/basile.b/dexed.git
1
0
Fork 0
Code Issues Packages Projects Releases Wiki Activity

prevent dup in imports list

This commit is contained in:
Basile Burg 2016-06-18 09:06:48 +02:00
parent 4bb368d8a2
commit 17a49c92a9
2 changed files with 2 additions and 2 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

2
src/ce_dlang.pas
View File

@ -1039,7 +1039,7 @@ begin
itm := ''
else if (tok^.Data = ';') or (tok^.Data = ':') or (tok^.Data = ',') then
begin
if length(itm) <> 0 then
if (length(itm) <> 0) and (imports.IndexOf(itm) = -1) then
imports.Add(itm);
itm := '';
if (tok^.Data = ';') or (tok^.Data = ':') then

2
src/ce_editor.lfm
View File

@ -136,7 +136,7 @@ inherited CEEditorWidget: TCEEditorWidget
OnClick = MenuItem5Click
end
object MenuItem8: TMenuItem
Caption = 'Save import to file...'
Caption = 'Save imports to file...'
OnClick = MenuItem8Click
end
end