Improved API for inspector 2 tabs: allow view to be actually a block returning the view. jv
authorJan Vrany <jan.vrany@fit.cvut.cz>
Thu, 21 May 2015 21:56:44 +0100
branchjv
changeset 15659 bdc9e920f640
parent 15658 43b2d989bf0a
child 15661 99f2c47afd96
Improved API for inspector 2 tabs: allow view to be actually a block returning the view. This allow for lazy-initialization of the view while using short an conncise #view: setter.
Tools__Inspector2Tab.st
--- a/Tools__Inspector2Tab.st	Fri May 22 06:42:14 2015 +0200
+++ b/Tools__Inspector2Tab.st	Thu May 21 21:56:44 2015 +0100
@@ -102,11 +102,16 @@
     "Modified: / 24-03-2014 / 18:25:32 / Jan Vrany <jan.vrany@fit.cvut.cz>"
 !
 
-view:aView
-    view := aView.
+view:aViewOrBlock
+    aViewOrBlock isBlock ifTrue:[ 
+        viewHolder := aViewOrBlock
+    ] ifFalse:[
+        view := aViewOrBlock.
+    ]
 
     "Created: / 16-01-2008 / 16:51:05 / janfrog"
     "Modified: / 17-02-2008 / 08:58:46 / janfrog"
+    "Modified: / 21-05-2015 / 21:31:15 / Jan Vrany <jan.vrany@fit.cvut.cz>"
 !
 
 viewHolder:something
@@ -129,6 +134,11 @@
     ^ '$Header: /cvs/stx/stx/libtool/Tools__Inspector2Tab.st,v 1.8 2014-03-24 22:38:21 vrany Exp $'
 !
 
+version_HG
+
+    ^ '$Changeset: <not expanded> $'
+!
+
 version_SVN
     ^ '$Id: Tools__Inspector2Tab.st,v 1.8 2014-03-24 22:38:21 vrany Exp $'
 ! !