GLMBasicExamples>>roassalWithCustomHighlight needs update

ROUnhighlightElement and ROHighlightElement classes have been removed from Roassal so GLMBasicExamples>>roassalWithCustomHighlight should be changed. Here is the fix that works:

| browser |

browser := GLMTabulator new .

browser

with: [:tabulator | 

tabulator column: #index; column: #visualization.

tabulator transmit to: #index; andShow: [:a | a list ].

tabulator transmit to: #visualization; andShowIfNone:[ :a | 

a roassal 

painting: [:view :collection :roassal | 

view shape label.

view interaction on: ROMouseLeftClick do: [:ann | (roassal pane port: #selection) value: ann element model ].

view nodes: collection.

view gridLayout.

roassal on: GLMContextChanged do: [:ann |

ann property = #selection ifTrue: [

ann oldValue ifNotNil: [

ROBlink unhighlight: (ann presentation view raw elementFromModel: ann oldValue).

ROBlink 

highlight: (ann presentation view raw elementFromModel: ann value) 

].

]]]].

tabulator transmit from: #index; to: #visualization port: #selection.

tabulator transmit from: #visualization port: #selection; to: #index port: #selection.

].

browser openOn: (1 to: 42)

_______________________________________________
Moose-dev mailing list
[hidden email]
https://www.iam.unibe.ch/mailman/listinfo/moose-dev