--- a/Collection.st	Wed Feb 22 19:02:03 2017 +0100
+++ b/Collection.st	Wed Feb 22 19:02:07 2017 +0100
@@ -4252,7 +4252,7 @@
     |noneYet total limit|
 
     "/ what a kludge - Dolphin and Squeak mean: printOn: a stream;
-    "/ ST/X (and some old ST80's) mean: draw-yourself on a GC.
+    "/ old ST80 means: draw-yourself on a GC.
     (aGCOrStream isStream) ifFalse:[
         ^ super displayOn:aGCOrStream
     ].
@@ -4291,8 +4291,9 @@
                      at:#foo put:'bar'; yourself) displayString
     "
 
-    "Modified: / 20.1.1998 / 14:11:03 / stefan"
-    "Modified: / 2.2.1999 / 22:39:44 / cg"
+    "Modified: / 20-01-1998 / 14:11:03 / stefan"
+    "Modified: / 02-02-1999 / 22:39:44 / cg"
+    "Modified (format): / 22-02-2017 / 16:46:32 / cg"
 !
 
 displayStringName