paweld/lazarus
1
0
Fork 0
mirror of https://gitlab.com/freepascal.org/lazarus/lazarus.git synced 2025-08-18 20:19:29 +02:00
Code Issues Packages Projects Releases Wiki Activity

IDE: clean up

Browse Source 
git-svn-id: trunk@29602 -
This commit is contained in:
mattias 2011-02-18 20:07:22 +00:00
parent 7b812f3b86
commit f431caf66e
1 changed files with 1 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

2
ide/main.pp
View File

@ -2702,7 +2702,7 @@ begin
Ext:='*'+Ext;
if (TFileDialog.FindMaskInFilter(AllFilter,Ext)>0)
or (TFileDialog.FindMaskInFilter(AllEditorExt,Ext)>0) then continue;
debugln(['TMainIDE.mnuOpenClicked AllEditorExt=',AllEditorExt,' Ext=',Ext,' AllFilter=',AllFilter]);
//debugln(['TMainIDE.mnuOpenClicked AllEditorExt=',AllEditorExt,' Ext=',Ext,' AllFilter=',AllFilter]);
if AllEditorExt<>'|' then
AllEditorExt:=AllEditorExt+';';
AllEditorExt:=AllEditorExt+Ext;