From 5c223728493fd2ed574a35215bdbdbddab9ee2d9 Mon Sep 17 00:00:00 2001 From: juha Date: Sun, 16 Sep 2012 21:04:52 +0000 Subject: [PATCH] IDE: formatting git-svn-id: trunk@38700 - --- ide/findinfilesdlg.pas | 5 ++--- ide/sourceeditor.pp | 1 - packager/installpkgsetdlg.pas | 3 +-- 3 files changed, 3 insertions(+), 6 deletions(-) diff --git a/ide/findinfilesdlg.pas b/ide/findinfilesdlg.pas index 8400cfbeca..24abc3246d 100644 --- a/ide/findinfilesdlg.pas +++ b/ide/findinfilesdlg.pas @@ -88,9 +88,8 @@ var function FindInFilesDialog: TLazFindInFilesDialog; begin - Result := FindInFilesDialogSingleton; - if FindInFilesDialogSingleton <> nil then exit; - FindInFilesDialogSingleton := TLazFindInFilesDialog.Create(Application); + if FindInFilesDialogSingleton = nil then + FindInFilesDialogSingleton := TLazFindInFilesDialog.Create(Application); Result := FindInFilesDialogSingleton; end; diff --git a/ide/sourceeditor.pp b/ide/sourceeditor.pp index f289f7f6e2..70bb759d51 100644 --- a/ide/sourceeditor.pp +++ b/ide/sourceeditor.pp @@ -8652,7 +8652,6 @@ begin if EditorMacroForRecording = nil then EditorMacroForRecording := FMacroRecorder; - FUpdateFlags := []; FAutoFocusLock := 0; for i := low(TsemChangeReason) to high(TsemChangeReason) do diff --git a/packager/installpkgsetdlg.pas b/packager/installpkgsetdlg.pas index 8ac706dc98..bf769427ae 100644 --- a/packager/installpkgsetdlg.pas +++ b/packager/installpkgsetdlg.pas @@ -743,9 +743,8 @@ begin if (Info.LPKParsed in [ipisNotParsed,ipisParsingHelperThread]) or (Info.PkgType in [lptDesignTime,lptRunAndDesignTime]) then begin - if (not PackageInInstallList(Info.ID.Name)) then begin + if (not PackageInInstallList(Info.ID.Name)) then List.Add(Info.ID.IDAsString); - end; end; ANode:=fAvailablePackages.FindSuccessor(ANode); end;