--- a/KeyedCollection.st Thu Aug 19 21:39:34 2010 +0100
+++ b/KeyedCollection.st Thu Aug 26 11:12:57 2010 +0100
@@ -153,14 +153,6 @@
^ self subclassResponsibility
"Created: / 19.6.1998 / 00:56:52 / cg"
-!
-
-keysDo:aBlock
- "evaluate aBlock for each key"
-
- self keysAndValuesDo:[:elKey :elValue | aBlock value:elKey]
-
- "Created: / 19.6.1998 / 00:56:34 / cg"
! !
!KeyedCollection methodsFor:'removing'!
@@ -208,16 +200,17 @@
!KeyedCollection class methodsFor:'documentation'!
version
- ^ '$Id: KeyedCollection.st 10544 2010-07-12 16:20:36Z vranyj1 $'
+ ^ '$Id: KeyedCollection.st 10570 2010-08-26 10:12:57Z vranyj1 $'
!
version_CVS
- ^ 'Header: /cvs/stx/stx/libbasic/KeyedCollection.st,v 1.7 2010/01/29 16:42:18 cg Exp '
+ ^ 'Header: /cvs/stx/stx/libbasic/KeyedCollection.st,v 1.8 2010/08/24 08:29:08 cg Exp '
!
version_SVN
- ^ '$Id: KeyedCollection.st 10544 2010-07-12 16:20:36Z vranyj1 $'
+ ^ '$Id: KeyedCollection.st 10570 2010-08-26 10:12:57Z vranyj1 $'
! !
+