--- a/DeviceGraphicsContext.st	Tue Jan 22 11:51:17 2019 +0100
+++ b/DeviceGraphicsContext.st	Fri Jan 25 17:09:41 2019 +0100
@@ -3901,6 +3901,7 @@
             "mhmh - seems to be some kind of form ..."
             paint := paint onDevice:device.
             dither := paint.
+            dither isColor ifTrue:[^ self].
         ].
         "
          a dithered color or image
@@ -3935,8 +3936,9 @@
         self maskOriginX:vOrg x negated y:vOrg y negated.
     ]
 
-    "Created: 16.5.1996 / 15:35:51 / cg"
-    "Modified: 6.6.1997 / 12:55:38 / cg"
+    "Created: / 16-05-1996 / 15:35:51 / cg"
+    "Modified: / 06-06-1997 / 12:55:38 / cg"
+    "Modified: / 25-01-2019 / 17:09:21 / Claus Gittinger"
 !
 
 setId:aDrawableId