From 69cb699ca61eaca84acadb61c8120fdc359efa1e Mon Sep 17 00:00:00 2001
From: mattias <nc-gaertnma@netcologne.de>
Date: Mon, 12 Oct 2009 11:38:35 +0000
Subject: [PATCH] IDE: fixed uninitialized result

git-svn-id: trunk@22109 -
---
 ide/sourceeditor.pp | 7 ++++---
 1 file changed, 4 insertions(+), 3 deletions(-)

diff --git a/ide/sourceeditor.pp b/ide/sourceeditor.pp
index 8074a3f995..e26a14dc7d 100644
--- a/ide/sourceeditor.pp
+++ b/ide/sourceeditor.pp
@@ -612,9 +612,9 @@ type
     procedure EditorMouseLink(
       Sender: TObject; X,Y: Integer; var AllowMouseLink: Boolean);
     function EditorGetIndent(Sender: TSynCustomBeautifier; Editor: TObject;
-                              LogCaret: TPoint; var FirstLinePos, LinesCount: Integer;
-                              Reason: TSynEditorCommand;
-                              SetIndentProc: TSynBeautifierSetIndentProc): Boolean;
+                             LogCaret: TPoint; var FirstLinePos, LinesCount: Integer;
+                             Reason: TSynEditorCommand;
+                             SetIndentProc: TSynBeautifierSetIndentProc): Boolean;
     procedure EditorKeyDown(Sender: TObject; var Key: Word; Shift: TShiftState);
     procedure EditorMouseWheel(Sender: TObject; Shift: TShiftState;
          WheelDelta: Integer; MousePos: TPoint; var Handled: Boolean);
@@ -6742,6 +6742,7 @@ function TSourceNotebook.EditorGetIndent(Sender: TSynCustomBeautifier; Editor: T
   LogCaret: TPoint; var FirstLinePos, LinesCount: Integer; Reason: TSynEditorCommand;
   SetIndentProc: TSynBeautifierSetIndentProc): Boolean;
 begin
+  Result:=false;
   if Assigned(OnGetIndent) then
     Result := OnGetIndent(Sender, GetActiveSE, LogCaret, FirstLinePos, LinesCount,
                           Reason, SetIndentProc);