--- a/Depth1Image.st	Wed May 30 13:42:32 2007 +0200
+++ b/Depth1Image.st	Wed May 30 13:43:02 2007 +0200
@@ -182,7 +182,7 @@
 
     |f c0 c1|
 
-    f := Form width:width height:height fromArray:self bits on:aDevice.
+    f := Form width:width height:height fromArray:self bits onDevice:aDevice.
     c0 := self colorFromValue:0.
     c1 := self colorFromValue:1.
     c0 brightness > 0.5 ifTrue:[
@@ -772,5 +772,5 @@
 !Depth1Image class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libview/Depth1Image.st,v 1.55 2007-05-29 17:32:27 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libview/Depth1Image.st,v 1.56 2007-05-30 11:43:02 stefan Exp $'
 ! !