--- a/Cursor.st Tue Nov 11 21:45:29 2008 +0100
+++ b/Cursor.st Wed Nov 12 10:26:51 2008 +0100
@@ -9,7 +9,6 @@
other person. No title to or ownership of the software is
hereby transferred.
"
-
"{ Package: 'stx:libview' }"
Object subclass:#Cursor
@@ -2969,6 +2968,19 @@
"Modified: 23.10.1997 / 00:16:44 / cg"
! !
+!Cursor class methodsFor:'styles'!
+
+disableThumbsCursors
+
+ ThumbsUpCursor := NormalCursor.
+ ThumbsDownCursor := NormalCursor.
+
+ "
+ self initializeNewCursors.
+ self disableThumbsCursors.
+ "
+! !
+
!Cursor methodsFor:'ST-80 displaying'!
displayOn:aGC at:origin clippingBox:aRectangle rule:aRule mask:aMask
@@ -3350,7 +3362,7 @@
!Cursor class methodsFor:'documentation'!
version
- ^ '$Header: /cvs/stx/stx/libview/Cursor.st,v 1.105 2006-03-29 08:44:13 stefan Exp $'
+ ^ '$Header: /cvs/stx/stx/libview/Cursor.st,v 1.106 2008-11-12 09:26:51 fm Exp $'
! !
Cursor initialize!