--- a/Dictionary.st	Thu Apr 07 13:23:33 2011 +0200
+++ b/Dictionary.st	Fri Apr 08 13:56:21 2011 +0200
@@ -531,7 +531,8 @@
     keyArray do:[:key | 
         (key notNil and:[key ~~ DeletedEntry]) ifTrue:[
             key == NilKey ifTrue:[
-                keySet add:nil
+                 "No, Set does not accept nil as an element!!"
+"/                keySet add:nil
             ] ifFalse:[
                 keySet add:key
             ]
@@ -2057,11 +2058,11 @@
 !Dictionary class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libbasic/Dictionary.st,v 1.102 2010-08-24 08:28:27 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libbasic/Dictionary.st,v 1.103 2011-04-08 11:56:21 stefan Exp $'
 !
 
 version_CVS
-    ^ '$Header: /cvs/stx/stx/libbasic/Dictionary.st,v 1.102 2010-08-24 08:28:27 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libbasic/Dictionary.st,v 1.103 2011-04-08 11:56:21 stefan Exp $'
 ! !
 
 Dictionary initialize!