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

SourcEditor: Fixed compilation, due to misplaced {$EndIf}

Browse Source 
git-svn-id: trunk@24182 -
This commit is contained in:
martin 2010-03-23 15:00:17 +00:00
parent 224df20d00
commit 8b3fc5709e
1 changed files with 1 additions and 2 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

3
ide/sourceeditor.pp
View File

@ -6019,6 +6019,7 @@ begin
f.show; f.show;
ASrcEdit.OtherViewList.Add(f); ASrcEdit.OtherViewList.Add(f);
end; end;
{$ENDIF}
procedure TSourceNotebook.SrcEditMenuCopyToNewWindow(Sender: TObject); procedure TSourceNotebook.SrcEditMenuCopyToNewWindow(Sender: TObject);
begin begin
@ -6036,8 +6037,6 @@ begin
MoveEditor(PageIndex, (Sender as TIDEMenuItem).Tag, -1) MoveEditor(PageIndex, (Sender as TIDEMenuItem).Tag, -1)
end; end;
{$ENDIF}
Procedure TSourceNotebook.UpdateStatusBar; Procedure TSourceNotebook.UpdateStatusBar;
var var
tempEditor: TSourceEditor; tempEditor: TSourceEditor;