--- a/HorizontalSteppingSlider.st	Mon Aug 09 11:11:21 1999 +0200
+++ b/HorizontalSteppingSlider.st	Tue Aug 10 11:01:07 1999 +0200
@@ -62,16 +62,17 @@
 "
 ! !
 
-!HorizontalSteppingSlider methodsFor:'queries'!
+!HorizontalSteppingSlider methodsFor:'initialization'!
 
-orientation
-    ^ #horizontal
+initialize
+    orientation := #horizontal. 
+    super initialize.
 
-    "Created: 28.5.1997 / 15:10:16 / cg"
+
 ! !
 
 !HorizontalSteppingSlider class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libwidg2/HorizontalSteppingSlider.st,v 1.11 1997-05-28 14:20:21 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libwidg2/HorizontalSteppingSlider.st,v 1.12 1999-08-10 09:01:07 cg Exp $'
 ! !