From deb1eafd127b4297ccd1e9245b3636ec7b29e836 Mon Sep 17 00:00:00 2001
From: mattias <nc-gaertnma@netcologne.de>
Date: Sun, 22 Jan 2012 13:23:05 +0000
Subject: [PATCH] IDEIntf: allow writing WidgetSetRestrictions in OI

git-svn-id: trunk@34865 -
---
 ideintf/oifavouriteproperties.pas | 7 ++-----
 1 file changed, 2 insertions(+), 5 deletions(-)

diff --git a/ideintf/oifavouriteproperties.pas b/ideintf/oifavouriteproperties.pas
index 9cad886679..9dace71cd9 100644
--- a/ideintf/oifavouriteproperties.pas
+++ b/ideintf/oifavouriteproperties.pas
@@ -110,17 +110,14 @@ type
   { TOIRestrictedProperties }
 
   TOIRestrictedProperties = class(TOIFavouriteProperties)
-  protected
-    FWidgetSetRestrictions: TWidgetSetRestrictionsArray;
   public
+    WidgetSetRestrictions: TWidgetSetRestrictionsArray;
     constructor Create;
 
     function IsRestricted(AClass: TPersistentClass;
                           const PropertyName: string): TLCLPlatforms;
     function AreRestricted(Selection: TPersistentSelectionList;
                            const PropertyName: string): TLCLPlatforms;
-    property WidgetSetRestrictions: TWidgetSetRestrictionsArray
-      read FWidgetSetRestrictions;
   end;
 
 implementation
@@ -627,7 +624,7 @@ begin
   inherited Create;
 
   for P := Low(TLCLPlatform) to High(TLCLPlatform) do
-    FWidgetSetRestrictions[P] := 0;
+    WidgetSetRestrictions[P] := 0;
 end;
 
 function TOIRestrictedProperties.IsRestricted(AClass: TPersistentClass;