--- a/Depth24Image.st	Wed Aug 18 17:06:59 1999 +0200
+++ b/Depth24Image.st	Wed Aug 18 17:09:03 1999 +0200
@@ -917,7 +917,7 @@
                                 color := Color redByte:r
                                              greenByte:g
                                               blueByte:b.
-                                color := color on:aDevice.
+                                color := color onDevice:aDevice.
                                 (id := color colorId) isNil ifTrue:[
                                     fit := false
                                 ] ifFalse:[
@@ -2420,5 +2420,5 @@
 !Depth24Image class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libview/Depth24Image.st,v 1.70 1999-06-24 08:37:43 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libview/Depth24Image.st,v 1.71 1999-08-18 15:09:03 cg Exp $'
 ! !