Permalink
Browse files

Allow dynamic model to compose with other dynamic models

  • Loading branch information...
BenjaminVanRyseghem committed Jan 21, 2014
1 parent 0f61c3b commit 5d28c1f293bb1654e7395c18a2ea733fbd551d10
@@ -0,0 +1,8 @@
instance creation
assign: aModel to: anInstVarName

widgets
at: anInstVarName
put: aModel.

aModel owner: self

This file was deleted.

Oops, something went wrong.
@@ -2,4 +2,5 @@ initialization
initialize

widgets := OrderedIdentityDictionary new asValueHolder.
layout := nil asValueHolder.
super initialize.
@@ -0,0 +1,4 @@
accessing
layout: aLayout

layout value: aLayout
@@ -0,0 +1,4 @@
accessing
layout

^ layout value
@@ -0,0 +1,5 @@
protocol
openWithSpec

self layout ifNil: [ ^ super openWithSpec ].
^ self openWithSpecLayout: self layout
@@ -0,0 +1,8 @@
protocol
retrieveSpec: aSelector

self layout ifNil: [ ^ super retrieveSpec: aSelector ].

^ self layout
selector: aSelector;
yourself
@@ -2,11 +2,15 @@
"class" : {
},
"instance" : {
"assign:to:" : "BenjaminVanRyseghem 1/21/2014 09:48",
"doesNotUnderstand:" : "BenjaminVanRyseghem 7/9/2012 16:01",
"ensureExtentFor:" : "BenjaminVanRyseghem 1/12/2014 17:03",
"initialize" : "CamilloBruni 7/17/2013 22:55",
"initialize" : "BenjaminVanRyseghem 1/21/2014 09:51",
"initializeWidgets" : "BenjaminVanRyseghem 7/10/2012 23:21",
"instantiateModels:" : "BenjaminVanRyseghem 7/9/2012 16:24",
"layout" : "BenjaminVanRyseghem 1/21/2014 09:53",
"layout:" : "BenjaminVanRyseghem 1/21/2014 09:53",
"needFullRebuild:" : "BenjaminVanRyseghem 7/10/2012 21:51",
"openWithSpec" : "BenjaminVanRyseghem 1/21/2014 09:54",
"retrieveSpec:" : "BenjaminVanRyseghem 1/21/2014 09:55",
"widgets" : "BenjaminVanRyseghem 7/11/2012 03:30",
"widgetsDo:" : "BenjaminVanRyseghem 7/10/2012 21:51" } }
@@ -6,7 +6,8 @@
],
"commentStamp" : "<historical>",
"instvars" : [
"widgets" ],
"widgets",
"layout" ],
"name" : "DynamicComposableModel",
"pools" : [
],

Large diffs are not rendered by default.

Oops, something went wrong.

0 comments on commit 5d28c1f

Please sign in to comment.