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 }
|
{ #category : #accessing }
|
||||||
GrafoscopioNode >> links [
|
GrafoscopioNode >> links [
|
||||||
"I model local or remote links that are associated to a particular node."
|
"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 }
|
{ #category : #accessing }
|
||||||
|
@ -62,14 +62,8 @@ GrafoscopioNotebook >> autoSaveBodyOf: aNode [
|
|||||||
ifTrue: [ | playground |
|
ifTrue: [ | playground |
|
||||||
playground := body body glmPres.
|
playground := body body glmPres.
|
||||||
playground
|
playground
|
||||||
when: GLMContextChanged
|
onChangeOfPort: #text
|
||||||
do: [ :ann |
|
act: [ :x | aNode body: x entity value content ]]
|
||||||
ann property = #text
|
|
||||||
ifTrue: [ | playgroundText |
|
|
||||||
playgroundText := (playground pane ports at: 2) value.
|
|
||||||
aNode body: playgroundText ]
|
|
||||||
]
|
|
||||||
]
|
|
||||||
]
|
]
|
||||||
|
|
||||||
{ #category : #accessing }
|
{ #category : #accessing }
|
||||||
|
Loading…
Reference in New Issue
Block a user