--- a/XPMReader.st	Thu Feb 16 17:31:59 2017 +0100
+++ b/XPMReader.st	Fri Feb 17 08:54:18 2017 +0100
@@ -365,8 +365,7 @@
 
 readImage
     "read an XPM-image from my inStream. Return the receiver 
-     (with all relevant instance variables set for the image) 
-     or nil on error"
+     (with all relevant instance variables set for the image)" 
 
     |line 
      srcIndex "{ Class: SmallInteger }"
@@ -534,10 +533,10 @@
      XPMReader fromStream:('../../goodies/bitmaps/xpmBitmaps/FATAL.xpm' asFilename readStream)
     "
 
-    "Created: / 24.9.1995 / 06:20:06 / claus"
-    "Modified: / 24.9.1995 / 07:07:33 / claus"
-    "Modified: / 5.7.1996 / 17:27:59 / stefan"
-    "Modified: / 27.7.1998 / 20:01:56 / cg"
+    "Created: / 24-09-1995 / 06:20:06 / claus"
+    "Modified: / 05-07-1996 / 17:27:59 / stefan"
+    "Modified: / 27-07-1998 / 20:01:56 / cg"
+    "Modified (comment): / 17-02-2017 / 08:54:06 / cg"
 ! !
 
 !XPMReader methodsFor:'writing'!