--- a/SelTreeV.st Wed Aug 18 16:33:04 1999 +0200
+++ b/SelTreeV.st Wed Aug 18 16:35:51 1999 +0200
@@ -290,7 +290,7 @@
lineColor := col.
shown ifTrue:[
- lineColor notNil ifTrue:[lineColor := lineColor on:device].
+ lineColor notNil ifTrue:[lineColor := lineColor onDevice:device].
self invalidate
]
]
@@ -484,7 +484,7 @@
img device ~~ device ifTrue:[
img := img copy.
].
- img := img on:device.
+ img := img onDevice:device.
img := img clearMaskedPixels.
].
^ img
@@ -2370,5 +2370,5 @@
!SelectionInTreeView class methodsFor:'documentation'!
version
- ^ '$Header: /cvs/stx/stx/libwidg2/Attic/SelTreeV.st,v 1.85 1999-07-06 16:51:00 cg Exp $'
+ ^ '$Header: /cvs/stx/stx/libwidg2/Attic/SelTreeV.st,v 1.86 1999-08-18 14:35:51 cg Exp $'
! !
--- a/SelectionInTreeView.st Wed Aug 18 16:33:04 1999 +0200
+++ b/SelectionInTreeView.st Wed Aug 18 16:35:51 1999 +0200
@@ -290,7 +290,7 @@
lineColor := col.
shown ifTrue:[
- lineColor notNil ifTrue:[lineColor := lineColor on:device].
+ lineColor notNil ifTrue:[lineColor := lineColor onDevice:device].
self invalidate
]
]
@@ -484,7 +484,7 @@
img device ~~ device ifTrue:[
img := img copy.
].
- img := img on:device.
+ img := img onDevice:device.
img := img clearMaskedPixels.
].
^ img
@@ -2370,5 +2370,5 @@
!SelectionInTreeView class methodsFor:'documentation'!
version
- ^ '$Header: /cvs/stx/stx/libwidg2/SelectionInTreeView.st,v 1.85 1999-07-06 16:51:00 cg Exp $'
+ ^ '$Header: /cvs/stx/stx/libwidg2/SelectionInTreeView.st,v 1.86 1999-08-18 14:35:51 cg Exp $'
! !