HorizontalSlider.st
changeset 48 c844acacf010
parent 24 6704fad5eb7d
child 49 4dd0f5c3353e
--- a/HorizontalSlider.st	Tue Apr 11 18:29:42 1995 +0200
+++ b/HorizontalSlider.st	Sun Apr 30 15:40:33 1995 +0200
@@ -21,7 +21,7 @@
 COPYRIGHT (c) 1992 by Claus Gittinger
 	      All Rights Reserved
 
-$Header: /cvs/stx/stx/libwidg2/HorizontalSlider.st,v 1.2 1994-10-10 03:13:15 claus Exp $
+$Header: /cvs/stx/stx/libwidg2/HorizontalSlider.st,v 1.3 1995-04-30 13:40:33 claus Exp $
 '!
 
 !HorizontalSlider class methodsFor:'documentation'!
@@ -42,7 +42,7 @@
 
 version
 "
-$Header: /cvs/stx/stx/libwidg2/HorizontalSlider.st,v 1.2 1994-10-10 03:13:15 claus Exp $
+$Header: /cvs/stx/stx/libwidg2/HorizontalSlider.st,v 1.3 1995-04-30 13:40:33 claus Exp $
 "
 !
 
@@ -57,7 +57,7 @@
 initialize
     sliderHeight := (self verticalPixelPerMillimeter:10) rounded.
     super initialize.
-    thumbHeight := 0
+    thumbHeight := 0.
 !
 
 initStyle