--- a/Image.st	Fri Jan 10 16:06:32 1997 +0100
+++ b/Image.st	Fri Jan 10 16:11:42 1997 +0100
@@ -1069,7 +1069,7 @@
     "
      nope - unknown format
     "
-    'IMAGE: unknown image file format in stream: ' infoPrintCR.
+    'Image [info]: unknown image file format in stream: ' infoPrintCR.
     ^ nil
 
     "
@@ -1091,7 +1091,7 @@
     "
 
     "Created: 13.9.1996 / 18:06:00 / cg"
-    "Modified: 13.9.1996 / 18:07:25 / cg"
+    "Modified: 10.1.1997 / 15:45:53 / cg"
 ! !
 
 !Image class methodsFor:'misc'!
@@ -5555,7 +5555,7 @@
             dstIndex := nextDst.
         ].
     ] ifFalse:[
-        'IMAGE: slow floydSteinberg dither ..' infoPrintCR.
+        'Image [info]: slow floydSteinberg dither ..' infoPrintCR.
 
         0 to:(h-1) do:[:y |
             nextDst := dstIndex + bytesPerMonoRow.
@@ -6355,7 +6355,7 @@
             dstIndex := nextDst.
         ].
     ] ifFalse:[
-        'IMAGE: slow ordered dither ..' infoPrintCR.
+        'Image [info]: slow ordered dither ..' infoPrintCR.
 
         0 to:(h-1) do:[:y |
             nextDst := dstIndex + bytesPerOutRow.
@@ -6522,7 +6522,7 @@
             dstIndex := nextDst.
         ].
     ] ifFalse:[
-        'IMAGE: slow ordered dither ..' infoPrintCR.
+        'Image [info]: slow ordered dither ..' infoPrintCR.
 
         0 to:(h-1) do:[:y |
             nextDst := dstIndex + bytesPerMonoRow.
@@ -8726,6 +8726,6 @@
 !Image class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libview/Image.st,v 1.131 1997-01-07 15:09:38 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libview/Image.st,v 1.132 1997-01-10 15:11:03 cg Exp $'
 ! !
 Image initialize!