checkin from browser
authorClaus Gittinger <cg@exept.de>
Sun, 26 May 1996 13:36:58 +0200
changeset 689 1f0e278ce283
parent 688 569fd4799c3c
child 690 d579f684aa7e
checkin from browser
Scroller.st
--- a/Scroller.st	Sun May 26 13:33:59 1996 +0200
+++ b/Scroller.st	Sun May 26 13:36:58 1996 +0200
@@ -800,6 +800,14 @@
     ^ orientation
 !
 
+thumb
+    "for compatibility with scrollBars, return the receiver"
+
+    ^ self
+
+    "Created: 26.5.1996 / 12:21:12 / cg"
+!
+
 thumbColor
     "return the thumbs color"
 
@@ -1759,5 +1767,5 @@
 !Scroller class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libwidg/Scroller.st,v 1.52 1996-05-25 10:10:35 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libwidg/Scroller.st,v 1.53 1996-05-26 11:36:58 cg Exp $'
 ! !