From bca60bcb661ed48cd6954632678846c77fb49811 Mon Sep 17 00:00:00 2001
From: mattias <nc-gaertnma@netcologne.de>
Date: Thu, 25 Aug 2005 18:21:27 +0000
Subject: [PATCH] fixed Idle handler when no unit is open

git-svn-id: trunk@7568 -
---
 ide/main.pp | 3 ++-
 1 file changed, 2 insertions(+), 1 deletion(-)

diff --git a/ide/main.pp b/ide/main.pp
index 4b3c5cad1a..4adeb90422 100644
--- a/ide/main.pp
+++ b/ide/main.pp
@@ -11230,7 +11230,8 @@ begin
     if AnIDesigner is TDesigner then begin
       MainIDEBar.ToggleFormSpeedBtn.Enabled:=true;
     end else begin
-      MainIDEBar.ToggleFormSpeedBtn.Enabled:=AnUnitInfo.HasResources;
+      MainIDEBar.ToggleFormSpeedBtn.Enabled:=(AnUnitInfo<>nil)
+                                             and AnUnitInfo.HasResources;
     end;
   end;
 end;