Debugging persistance.
This commit is contained in:
parent
61940a3c4d
commit
f2319ec3e7
@ -74,8 +74,11 @@ GrafoscopioNotebook >> changeBody: aNode [
|
||||
body := self instantiate: aNode specModelClass new.
|
||||
body content: aNode content.
|
||||
body body class = TextModel
|
||||
ifTrue: [
|
||||
body body whenTextChanged: [ :arg | aNode body: arg ]].
|
||||
ifTrue: [body body whenTextChanged: [ :arg | aNode body: arg ]].
|
||||
body body class = GlamourPresentationModel
|
||||
ifTrue: [
|
||||
"Transcript show:" "body body glmPres inspect" ].
|
||||
"Transcript show: body body class; cr."
|
||||
header text: aNode header.
|
||||
body needRebuild: true.
|
||||
self buildWithSpecLayout: self class defaultSpec.
|
||||
|
Loading…
Reference in New Issue
Block a user