Fixing the bug about code nodes being replaced by their output when such output was text. Thanks Doru :-).
This commit is contained in:
parent
5a7078e2f2
commit
b289c02708
@ -493,7 +493,7 @@ GrafoscopioNode >> level: anInteger [
|
||||
{ #category : #accessing }
|
||||
GrafoscopioNode >> links [
|
||||
"I model local or remote links that are associated to a particular node."
|
||||
^ links ifNil: [ ^ links = OrderedCollection new ]
|
||||
^ links ifNil: [ ^ links := OrderedCollection new ]
|
||||
]
|
||||
|
||||
{ #category : #accessing }
|
||||
|
@ -62,14 +62,8 @@ GrafoscopioNotebook >> autoSaveBodyOf: aNode [
|
||||
ifTrue: [ | playground |
|
||||
playground := body body glmPres.
|
||||
playground
|
||||
when: GLMContextChanged
|
||||
do: [ :ann |
|
||||
ann property = #text
|
||||
ifTrue: [ | playgroundText |
|
||||
playgroundText := (playground pane ports at: 2) value.
|
||||
aNode body: playgroundText ]
|
||||
]
|
||||
]
|
||||
onChangeOfPort: #text
|
||||
act: [ :x | aNode body: x entity value content ]]
|
||||
]
|
||||
|
||||
{ #category : #accessing }
|
||||
|
Loading…
Reference in New Issue
Block a user