*** empty log message ***
authorClaus Gittinger <cg@exept.de>
Tue, 06 Feb 1996 01:40:38 +0100
changeset 407 1901e33fc758
parent 406 aaf6b6b1e787
child 408 bd946e47bc07
*** empty log message ***
WGroup.st
WindowGroup.st
--- a/WGroup.st	Tue Feb 06 01:39:31 1996 +0100
+++ b/WGroup.st	Tue Feb 06 01:40:38 1996 +0100
@@ -1087,7 +1087,7 @@
     self allViewsDo:[:aView |  
 	c := c on:(dev := aView device).
 	(id := c id) notNil ifTrue:[
-	    dev setCursor:cid in:aView id.
+	    dev setCursor:id in:aView id.
 	]
     ].
 !
@@ -1166,6 +1166,6 @@
 !WindowGroup class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libview/Attic/WGroup.st,v 1.62 1996-02-06 00:39:31 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libview/Attic/WGroup.st,v 1.63 1996-02-06 00:40:38 cg Exp $'
 ! !
 WindowGroup initialize!
--- a/WindowGroup.st	Tue Feb 06 01:39:31 1996 +0100
+++ b/WindowGroup.st	Tue Feb 06 01:40:38 1996 +0100
@@ -1087,7 +1087,7 @@
     self allViewsDo:[:aView |  
 	c := c on:(dev := aView device).
 	(id := c id) notNil ifTrue:[
-	    dev setCursor:cid in:aView id.
+	    dev setCursor:id in:aView id.
 	]
     ].
 !
@@ -1166,6 +1166,6 @@
 !WindowGroup class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libview/WindowGroup.st,v 1.62 1996-02-06 00:39:31 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libview/WindowGroup.st,v 1.63 1996-02-06 00:40:38 cg Exp $'
 ! !
 WindowGroup initialize!