use eye as replacement for questionmark
authorClaus Gittinger <cg@exept.de>
Fri, 30 Apr 1999 10:31:53 +0200
changeset 2618 a03aee8c0b4b
parent 2617 d16f608fa54a
child 2619 8cd6909a436e
use eye as replacement for questionmark
Cursor.st
--- a/Cursor.st	Fri Apr 30 02:13:42 1999 +0200
+++ b/Cursor.st	Fri Apr 30 10:31:53 1999 +0200
@@ -2283,18 +2283,19 @@
         crsr := self shape:#questionMark on:Display.
         (crsr isNil 
         or:[crsr id isNil]) ifTrue:[
-            crsr := self wait
+            crsr := self eye
         ].
         QuestionMarkCursor := crsr.
     ].                   
     ^ QuestionMarkCursor
 
     "
+     QuestionMarkCursor := nil.
      Cursor questionMark
         showWhile:[ Delay waitForSeconds:3 ]
     "
 
-    "Modified: / 30.4.1999 / 01:34:11 / cg"
+    "Modified: / 30.4.1999 / 10:14:52 / cg"
 !
 
 read
@@ -2914,6 +2915,6 @@
 !Cursor class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libview/Cursor.st,v 1.69 1999-04-29 23:51:04 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libview/Cursor.st,v 1.70 1999-04-30 08:31:53 cg Exp $'
 ! !
 Cursor initialize!