--- a/Cursor.st	Fri Jan 10 19:04:32 1997 +0100
+++ b/Cursor.st	Fri Jan 10 19:05:44 1997 +0100
@@ -1879,7 +1879,7 @@
     shape notNil ifTrue:[
         id := aDevice createCursorShape:shape.
         id isNil ifTrue:[
-            'CURSOR: no cursor with shape:' errorPrint. shape errorPrintNL.
+            'Cursor [warning]: no cursor with shape:' errorPrint. shape errorPrintCR.
             ^ self
         ].
     ] ifFalse:[
@@ -1916,7 +1916,7 @@
                                        width:w
                                       height:h.
         id isNil ifTrue:[
-            'CURSOR: cannot create pixmap cursor' errorPrintNL.
+            'Cursor [warning]: cannot create pixmap cursor' errorPrintCR.
             ^ self
         ].
     ].
@@ -1951,7 +1951,7 @@
     Lobby register:newCursor.
     ^ newCursor
 
-    "Modified: 19.12.1996 / 13:52:55 / cg"
+    "Modified: 10.1.1997 / 17:35:12 / cg"
 !
 
 restored
@@ -1988,6 +1988,6 @@
 !Cursor class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libview/Cursor.st,v 1.40 1996-12-19 13:51:31 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libview/Cursor.st,v 1.41 1997-01-10 18:05:44 cg Exp $'
 ! !
 Cursor initialize!