--- a/Image.st	Sat Feb 07 16:18:42 1998 +0100
+++ b/Image.st	Sat Feb 07 18:28:06 1998 +0100
@@ -10830,6 +10830,7 @@
      g "{ Class: SmallInteger }"
      b "{ Class: SmallInteger }"
      word "{ Class: SmallInteger }"
+     lword 
      device ddepth isMSB|
 
     depth := self depth.
@@ -11015,10 +11016,10 @@
                     dstIndex := dstRow.
 
                     1 to:w do:[:wi |
-                        word := tmpData doubleWordAt:srcIndex MSB:isMSB.
-                        r := (word bitShift:shR) bitAnd:maskR.
-                        g := (word bitShift:shG) bitAnd:maskG.
-                        b := (word bitShift:shB) bitAnd:maskB.
+                        lword := tmpData doubleWordAt:srcIndex MSB:isMSB.
+                        r := (lword bitShift:shR) bitAnd:maskR.
+                        g := (lword bitShift:shG) bitAnd:maskG.
+                        b := (lword bitShift:shB) bitAnd:maskB.
 
                         inData at:dstIndex   put:r.
                         inData at:dstIndex+1 put:g.
@@ -11110,7 +11111,7 @@
     ].
 
     "Modified: / 9.1.1998 / 21:32:36 / stefan"
-    "Modified: / 26.1.1998 / 23:01:13 / cg"
+    "Modified: / 7.2.1998 / 18:23:07 / cg"
 !
 
 fromScreen:aRectangle
@@ -11278,6 +11279,6 @@
 !Image class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libview/Image.st,v 1.240 1998-02-07 10:26:34 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libview/Image.st,v 1.241 1998-02-07 17:28:06 cg Exp $'
 ! !
 Image initialize!