--- a/ScrollBar.st Tue Nov 24 17:56:00 1998 +0100
+++ b/ScrollBar.st Wed Dec 02 17:57:50 1998 +0100
@@ -407,7 +407,7 @@
"if I become too small, hide buttons"
- width < (leftAndRightWidth + m2) ifTrue:[
+ width <= (leftAndRightWidth + m2) ifTrue:[
b1Hidden := b2Hidden := thumbHidden := true.
] ifFalse:[
b1Hidden := b2Hidden := thumbHidden := false.
@@ -435,7 +435,7 @@
"if I become too small, hide buttons and thumb"
- height < (upAndDownHeight + (m2)) ifTrue:[
+ height <= (upAndDownHeight + (m2)) ifTrue:[
b1Hidden := b2Hidden := thumbHidden := true.
] ifFalse:[
b1Hidden := b2Hidden := thumbHidden := false.
@@ -666,7 +666,7 @@
].
"Modified: / 3.5.1996 / 23:49:02 / stefan"
- "Modified: / 15.7.1998 / 13:49:36 / cg"
+ "Modified: / 2.12.1998 / 00:02:14 / cg"
! !
!ScrollBar methodsFor:'forced scroll'!
@@ -1032,5 +1032,5 @@
!ScrollBar class methodsFor:'documentation'!
version
- ^ '$Header: /cvs/stx/stx/libwidg/ScrollBar.st,v 1.55 1998-07-15 11:50:54 cg Exp $'
+ ^ '$Header: /cvs/stx/stx/libwidg/ScrollBar.st,v 1.56 1998-12-02 16:57:50 cg Exp $'
! !