--- a/Collection.st	Thu Sep 21 11:19:26 2000 +0200
+++ b/Collection.st	Thu Sep 21 12:18:38 2000 +0200
@@ -1332,6 +1332,16 @@
     "
      #(1 2 3 4) do:[:el | Transcript show:el]
                 inBetweenDo:[ Transcript show:'-']
+
+     (Dictionary with:(1->'one') with:(2->'two'))
+         do:[:el | Transcript showCR:el printString]
+         inBetweenDo:[ Transcript showCR:'----']
+
+     (Dictionary with:(1->'one') with:(2->'two'))
+        associations
+         do:[:el | Transcript showCR:el printString]
+         inBetweenDo:[ Transcript showCR:'----']
+
     "
 
     "Modified: / 11.2.2000 / 11:23:15 / cg"
@@ -2139,6 +2149,6 @@
 !Collection class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libbasic/Collection.st,v 1.103 2000-09-15 10:30:34 stefan Exp $'
+    ^ '$Header: /cvs/stx/stx/libbasic/Collection.st,v 1.104 2000-09-21 10:18:38 martin Exp $'
 ! !
 Collection initialize!