--- a/UpDownButton.st	Fri Jul 27 16:58:36 2001 +0200
+++ b/UpDownButton.st	Fri Jul 27 23:13:13 2001 +0200
@@ -292,7 +292,7 @@
 keyPress:aKey x:x y:y
     "simulate a buttonPress/release"
 
-    <resource: #keyboard (#CursorRight #CursorUp #CursorLeft #CursorDown #+ #-)>
+    <resource: #keyboard (#CursorRight #CursorUp #CursorLeft #CursorDown)>
 
    |theButton theController|
 
@@ -391,5 +391,5 @@
 !UpDownButton class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libwidg2/UpDownButton.st,v 1.17 2001-07-25 17:48:07 stefan Exp $'
+    ^ '$Header: /cvs/stx/stx/libwidg2/UpDownButton.st,v 1.18 2001-07-27 21:13:13 stefan Exp $'
 ! !