[BUG][FIX] can't create TwoWayScrollPanes any more
Ned Konz
ned at bike-nomad.com
Mon Feb 4 23:17:55 UTC 2002
in image 4653, try:
TwoWayScrollPane new
with the new scrollbar look. It blows up when it tries to get the color of
its nonexistent owner.
This fixes the problem:
TwoWayScrollPane>>colorForInsets
"My submorphs use the surrounding color"
| aColor |
owner ifNotNil: [
(aColor _ owner color) ifKindOf: Color thenDo: [:c | ^ aColor].
].
"This workaround relates to cases where the scrollPane's color is not a true
color but rather an InfiniteForm, which is not happy to be returned here"
^ Color white
--
Ned Konz
currently: Stanwood, WA
email: ned at bike-nomad.com
homepage: http://bike-nomad.com
More information about the Squeak-dev
mailing list
|