From ef22ab0b4a6f2fd853f8c8683ca24154e43283c6 Mon Sep 17 00:00:00 2001
From: martin <laz.git@mfriebe.de>
Date: Sat, 30 Oct 2010 18:53:38 +0000
Subject: [PATCH] Debugger: Fix "disabled" breakpoints are set as active, if
 the debugger is started. Issue #0017335

git-svn-id: trunk@27986 -
---
 ide/debugmanager.pas | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/ide/debugmanager.pas b/ide/debugmanager.pas
index 5565608abc..48ad1110e4 100644
--- a/ide/debugmanager.pas
+++ b/ide/debugmanager.pas
@@ -1049,7 +1049,6 @@ end;
 procedure TManagedBreakPoint.OnToggleEnableMenuItemClick(Sender: TObject);
 begin
   Enabled:=not Enabled;
-  InitialEnabled:=Enabled;
 end;
 
 procedure TManagedBreakPoint.OnDeleteMenuItemClick(Sender: TObject);
@@ -1162,6 +1161,7 @@ procedure TManagedBreakPoint.SetEnabled(const AValue: Boolean);
 begin
   if Enabled = AValue then exit;
   inherited SetEnabled(AValue);
+  InitialEnabled:=Enabled;
   if FMaster <> nil then FMaster.Enabled := AValue;
 end;