--- a/Image.st	Wed Mar 19 13:46:30 1997 +0100
+++ b/Image.st	Wed Mar 19 13:48:01 1997 +0100
@@ -8883,7 +8883,11 @@
     "
      get the pixels
     "
-    info := device getBitsFrom:aDrawable id x:x y:y width:w height:h into:inData. 
+    aDrawable isForm ifTrue:[
+        info := device getBitsFromPixmap:aDrawable id x:x y:y width:w height:h into:inData. 
+    ] ifFalse:[
+        info := device getBitsFromView:aDrawable id x:x y:y width:w height:h into:inData. 
+    ].
 
     "
      check if byteorder is what I like (msbFirst)
@@ -9028,7 +9032,7 @@
         colorMap := map.
     ].
 
-    "Modified: 10.1.1997 / 17:52:35 / cg"
+    "Modified: 19.3.1997 / 13:45:01 / cg"
 !
 
 fromScreen:aRectangle
@@ -9157,6 +9161,6 @@
 !Image class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libview/Image.st,v 1.153 1997-03-07 20:25:27 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libview/Image.st,v 1.154 1997-03-19 12:48:01 cg Exp $'
 ! !
 Image initialize!