--- a/SteppingSlider.st Sat Feb 05 13:00:12 2011 +0100
+++ b/SteppingSlider.st Sat Feb 05 18:37:29 2011 +0100
@@ -9,7 +9,6 @@
other person. No title to or ownership of the software is
hereby transferred.
"
-
"{ Package: 'stx:libwidg2' }"
ScrollBar subclass:#SteppingSlider
@@ -166,7 +165,7 @@
!SteppingSlider methodsFor:'event handling'!
keyPress:key x:x y:y
- <resource: #keyboard (#CursorRight #CursorUp #CursorLeft #CursorDown $+ $-)>
+ <resource: #keyboard (#CursorRight #CursorUp #CursorLeft #CursorDown #+ #-)>
|step|
"/ enabled ifFalse:[^ self].
@@ -265,5 +264,9 @@
!SteppingSlider class methodsFor:'documentation'!
version
- ^ '$Header: /cvs/stx/stx/libwidg2/SteppingSlider.st,v 1.13 2002-08-08 12:35:34 stefan Exp $'
+ ^ '$Header: /cvs/stx/stx/libwidg2/SteppingSlider.st,v 1.14 2011-02-05 17:37:29 stefan Exp $'
+!
+
+version_CVS
+ ^ '$Header: /cvs/stx/stx/libwidg2/SteppingSlider.st,v 1.14 2011-02-05 17:37:29 stefan Exp $'
! !