Added pre-open hooks.
authorJan Vrany <jan.vrany@fit.cvut.cz>
Wed, 05 Mar 2014 21:25:41 +0100
changeset 3298 9d82cfd4031c
parent 3297 eafb68a0471b
child 3299 c3f409635112
Added pre-open hooks.
ApplicationSubView.st
--- a/ApplicationSubView.st	Wed Mar 05 21:25:25 2014 +0100
+++ b/ApplicationSubView.st	Wed Mar 05 21:25:41 2014 +0100
@@ -133,6 +133,17 @@
 
 !
 
+preRealize
+    |app|
+
+    super preRealize.
+    (app := self application) notNil ifTrue:[
+        app preOpenAsSubcanvasWith:app builder
+    ]
+
+    "Created: / 05-03-2014 / 18:46:06 / Jan Vrany <jan.vrany@fit.cvut.cz>"
+!
+
 realize
     |app|
 
@@ -151,9 +162,10 @@
 !ApplicationSubView class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libview2/ApplicationSubView.st,v 1.11 2012-05-11 16:20:53 vrany Exp $'
+    ^ '$Header: /cvs/stx/stx/libview2/ApplicationSubView.st,v 1.12 2014-03-05 20:25:41 vrany Exp $'
 !
 
 version_CVS
-    ^ '$Header: /cvs/stx/stx/libview2/ApplicationSubView.st,v 1.11 2012-05-11 16:20:53 vrany Exp $'
+    ^ '$Header: /cvs/stx/stx/libview2/ApplicationSubView.st,v 1.12 2014-03-05 20:25:41 vrany Exp $'
 ! !
+