--- a/Tools__Inspector2Tab.st	Wed Jul 18 10:57:46 2012 +0100
+++ b/Tools__Inspector2Tab.st	Wed Jul 18 18:00:57 2012 +0100
@@ -14,7 +14,7 @@
 "{ NameSpace: Tools }"
 
 Object subclass:#Inspector2Tab
-	instanceVariableNames:'label view application priority'
+	instanceVariableNames:'label view application priority viewHolder'
 	classVariableNames:''
 	poolDictionaries:''
 	category:'Interface-Inspector2'
@@ -86,15 +86,19 @@
 
 view
     view isNil ifTrue:[
-        application ifNotNil:[
-            view := ApplicationSubView new client: application
+        viewHolder notNil ifTrue:[
+            view := viewHolder value
+        ] ifFalse:[
+            application notNil ifTrue:[
+                view := ApplicationSubView new client: application
+            ]
         ]
     ].
     ^ view
 
     "Created: / 16-01-2008 / 16:51:05 / janfrog"
     "Modified: / 17-02-2008 / 10:38:59 / janfrog"
-    "Modified (format): / 18-11-2011 / 15:00:22 / cg"
+    "Modified: / 13-06-2012 / 14:57:25 / cg"
 !
 
 view:aView
@@ -102,12 +106,16 @@
 
     "Created: / 16-01-2008 / 16:51:05 / janfrog"
     "Modified: / 17-02-2008 / 08:58:46 / janfrog"
+!
+
+viewHolder:something
+    viewHolder := something.
 ! !
 
 !Inspector2Tab class methodsFor:'documentation'!
 
 version_CVS
-    ^ '§Header: /cvs/stx/stx/libtool/Tools__Inspector2Tab.st,v 1.6 2011/11/18 14:06:10 cg Exp §'
+    ^ '§Header: /cvs/stx/stx/libtool/Tools__Inspector2Tab.st,v 1.7 2012/06/13 12:59:31 cg Exp §'
 !
 
 version_CVS_jvrany
@@ -115,5 +123,5 @@
 !
 
 version_SVN
-    ^ '$Id: Tools__Inspector2Tab.st 7854 2012-01-30 17:49:41Z vranyj1 $'
+    ^ '$Id: Tools__Inspector2Tab.st 8018 2012-07-18 17:00:57Z vranyj1 $'
 ! !