--- a/DSVColumnView.st Fri May 30 14:26:05 2008 +0200
+++ b/DSVColumnView.st Fri May 30 14:26:12 2008 +0200
@@ -2925,7 +2925,7 @@
button := widget menuButton.
ComboButtonForm := button label.
ComboButtonLevel := button offLevel.
- ComboButtonExtent := (button preferredExtent x) @ (widget preferredExtent y).
+ ComboButtonExtent := (button preferredWidth) @ (widget preferredHeight).
].
CheckToggleForm isNil ifTrue:[
@@ -3123,7 +3123,7 @@
].
preferredExtent := Point
x: width
- y: (self preferredExtent y).
+ y: (self preferredHeight).
width := self innerWidth - width.
(list notEmpty and:[width > 0]) ifTrue:[
@@ -3143,7 +3143,7 @@
(oldOrgX := viewOrigin x) ~~ 0 ifTrue:[
"/ UPDATE VIEW-ORIGIN X
- width := self preferredExtent x.
+ width := self preferredWidth.
newOrgX := (width - self innerWidth) max:0.
newOrgX < oldOrgX ifTrue:[
@@ -3170,7 +3170,7 @@
editView width:(selectedColumn width - (2 * separatorSize)).
]
].
- oldWidth ~= self preferredExtent x ifTrue:[
+ oldWidth ~= self preferredWidth ifTrue:[
self contentsChanged.
].
].
@@ -4406,5 +4406,5 @@
!DSVColumnView class methodsFor:'documentation'!
version
- ^ '$Header: /cvs/stx/stx/libwidg2/DSVColumnView.st,v 1.230 2008-03-31 13:49:02 fm Exp $'
+ ^ '$Header: /cvs/stx/stx/libwidg2/DSVColumnView.st,v 1.231 2008-05-30 12:26:12 cg Exp $'
! !