Offray/Grafoscopio
1
0
Fork 0
Code Issues Pull Requests Releases Wiki Activity

Fixing https://mutabit.com/repos.fossil/grafoscopio/tktview?name=8835f9017a , finally!

Browse Source
This commit is contained in:
Offray Vladimir Luna Cárdenas 2019-05-06 20:14:29 +00:00
parent 67b27d20b3
commit 70a6ff3961
1 changed files with 2 additions and 4 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

6
repository/Grafoscopio/GrafoscopioNotebook.class.st
View File

@ -75,16 +75,14 @@ GrafoscopioNotebook >> addNode [
{ #category : #operation }
GrafoscopioNotebook >> autoSaveBodyOf: aNode [
| playground |
body body class = TextModel
self body class = TextModel
ifTrue: [ body body whenTextChanged: [ :arg | aNode body: arg ] ].
body body class = GlamourPresentationModel
ifFalse: [ ^ self ].
playground := body body glmPres.
playground
onChangeOfPort: #text
act: [ :x | aNode body: (x pane port: #text) value ]";
onChangeOfPort: #activePresentation
act: [ aNode output: aNode processOutput ]"
act: [ :x | aNode body: (x pane port: #entity) value content ]
]
{ #category : #accessing }