From cb8750c0e9583f24e3d8bde69ddbc0a91e290bd2 Mon Sep 17 00:00:00 2001
From: mattias <nc-gaertnma@netcologne.de>
Date: Thu, 12 Jul 2012 12:51:04 +0000
Subject: [PATCH] IDE: changing control selection to another lookuproot: update
 hook.lookuproot

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

diff --git a/ide/main.pp b/ide/main.pp
index a5ec59d064..d4a2cd8335 100644
--- a/ide/main.pp
+++ b/ide/main.pp
@@ -14920,6 +14920,8 @@ begin
   if (TheControlSelection=nil) or (FormEditor1=nil) then exit;
   if OldForm<>nil then
     OldForm.Invalidate;
+  if TheControlSelection.LookupRoot<>nil then
+    GlobalDesignHook.LookupRoot:=TheControlSelection.LookupRoot;
   if NewForm<>nil then
     NewForm.Invalidate;
   UpdateIDEComponentPalette;