paweld/lazarus
1
0
Fork 0
mirror of https://gitlab.com/freepascal.org/lazarus/lazarus.git synced 2025-09-30 12:09:45 +02:00
Code Issues Packages Projects Releases Wiki Activity

find declaration: implemented file type

Browse Source 
git-svn-id: trunk@2908 -
This commit is contained in:
mattias 2002-08-18 08:55:54 +00:00
parent ddb7711b71
commit e740abbb78
1 changed files with 6 additions and 3 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

9
ide/main.pp
View File

@ -3754,7 +3754,7 @@ begin
// settings during restoration will work
SaveSourceEditorProjectSpecificSettings;
SourceNotebook.NewFile(CreateSrcEditPageName(AnUnitInfo.UnitName,
AFilename,-1),AnUnitInfo.Source);
AFilename,-1),AnUnitInfo.Source,false);
NewSrcEdit:=SourceNotebook.GetActiveSE;
NewSrcEditorCreated:=true;
itmFileClose.Enabled:=True;
@ -3835,8 +3835,8 @@ begin
// create a new sourceeditor
SourceNotebook.NewFile(CreateSrcEditPageName(NewUnitInfo.UnitName,
NewUnitInfo.Filename,-1),
NewUnitInfo.Source);
NewUnitInfo.Filename,-1),
NewUnitInfo.Source,true);
itmFileClose.Enabled:=True;
itmFileCloseAll.Enabled:=True;
NewSrcEdit:=SourceNotebook.GetActiveSE;
@ -8059,6 +8059,9 @@ end.
{ =============================================================================
$Log$
Revision 1.499 2003/03/27 08:50:47 mattias
find declaration: implemented file type
Revision 1.498 2003/03/26 10:56:30 mattias
added ToDo List from Olivier