diff -r 609caad9766c -r 188cd692f871 Cursor.st --- a/Cursor.st Thu May 17 16:15:55 2001 +0200 +++ b/Cursor.st Thu May 17 16:17:55 2001 +0200 @@ -3113,6 +3113,8 @@ "/ operating on a model. "/ Please use #onDevice: to avoid confusion. + + self obsoleteMethodWarning:'use #onDevice:'. ^ self onDevice:aDevice @@ -3328,6 +3330,6 @@ !Cursor class methodsFor:'documentation'! version - ^ '$Header: /cvs/stx/stx/libview/Cursor.st,v 1.93 2000-09-01 16:29:31 cg Exp $' + ^ '$Header: /cvs/stx/stx/libview/Cursor.st,v 1.94 2001-05-17 14:17:55 stefan Exp $' ! ! Cursor initialize!