--- a/Icon.st	Sat May 18 17:37:16 1996 +0200
+++ b/Icon.st	Mon May 20 09:26:04 1996 +0200
@@ -72,12 +72,14 @@
 
 initialize
     KnownIcons isNil ifTrue:[
-	KnownIcons := IdentityDictionary new
+        KnownIcons := Dictionary new
     ]
 
     "
      Icon initialize
     "
+
+    "Modified: 20.5.1996 / 09:24:10 / cg"
 !
 
 replacementNameFor:aName
@@ -170,6 +172,6 @@
 !Icon class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libview2/Icon.st,v 1.11 1996-05-13 08:30:42 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libview2/Icon.st,v 1.12 1996-05-20 07:26:04 cg Exp $'
 ! !
 Icon initialize!