--- a/MappedCollection.st	Thu Nov 17 15:21:02 1994 +0100
+++ b/MappedCollection.st	Mon Nov 28 21:57:01 1994 +0100
@@ -21,7 +21,7 @@
 COPYRIGHT (c) 1993 by Claus Gittinger
 	      All Rights Reserved
 
-$Header: /cvs/stx/stx/libbasic2/MappedCollection.st,v 1.8 1994-11-17 14:21:01 claus Exp $
+$Header: /cvs/stx/stx/libbasic2/MappedCollection.st,v 1.9 1994-11-28 20:56:58 claus Exp $
 '!
 
 !MappedCollection class methodsFor:'documentation'!
@@ -42,7 +42,7 @@
 
 version
 "
-$Header: /cvs/stx/stx/libbasic2/MappedCollection.st,v 1.8 1994-11-17 14:21:01 claus Exp $
+$Header: /cvs/stx/stx/libbasic2/MappedCollection.st,v 1.9 1994-11-28 20:56:58 claus Exp $
 "
 !
 
@@ -83,7 +83,7 @@
 contents
     |contents|
     contents := Bag new.
-    map do:[:key | contents add:domain at:key].
+    map do:[:key | contents add:(domain at:key)].
     ^ contents
 !