--- a/Slider.st	Wed Apr 07 10:39:01 2004 +0200
+++ b/Slider.st	Wed Apr 07 12:44:56 2004 +0200
@@ -235,6 +235,11 @@
 
 !Slider methodsFor:'accessing'!
 
+sliderHeight: something
+
+    sliderHeight := something.
+!
+
 thumbHeight
     "redefined since a slider has no height - just origin"
 
@@ -396,5 +401,5 @@
 !Slider class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libwidg2/Slider.st,v 1.36 2003-05-07 14:29:46 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libwidg2/Slider.st,v 1.37 2004-04-07 10:44:56 werner Exp $'
 ! !