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

codetools: fixed crash on FreeListOfPCodeXYPosition, IDE: fixed spelling mistake

Browse Source 
git-svn-id: trunk@13436 -
This commit is contained in:
mattias 2007-12-23 11:14:06 +00:00
parent d6b44baddd
commit c126253698
2 changed files with 6 additions and 6 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

2
components/codetools/codetoolmanager.pas
View File

@ -1405,7 +1405,7 @@ end;
procedure TCodeToolManager.FreeListOfPCodeXYPosition(var List: TFPList);
begin
if List<>nil then begin
FreeListOfPCodeXYPosition(List);
CodeAtom.FreeListOfPCodeXYPosition(List);
List:=nil;
end;
end;

10
ide/main.pp
View File

@ -2950,12 +2950,12 @@ end;
procedure TMainIDE.DoToggleViewComponentPalette;
var
ComponentPalleteVisible: boolean;
ComponentPaletteVisible: boolean;
begin
ComponentPalleteVisible:=not MainIDEBar.ComponentNotebook.Visible;
MainIDEBar.itmViewComponentPalette.Checked:=ComponentPalleteVisible;
MainIDEBar.ComponentNotebook.Visible:=ComponentPalleteVisible;
EnvironmentOptions.ComponentPaletteVisible:=ComponentPalleteVisible;
ComponentPaletteVisible:=not MainIDEBar.ComponentNotebook.Visible;
MainIDEBar.itmViewComponentPalette.Checked:=ComponentPaletteVisible;
MainIDEBar.ComponentNotebook.Visible:=ComponentPaletteVisible;
EnvironmentOptions.ComponentPaletteVisible:=ComponentPaletteVisible;
end;
procedure TMainIDE.DoToggleViewIDESpeedButtons;