--- a/WrappedMethod.st Mon Jun 23 10:56:35 2014 +0200
+++ b/WrappedMethod.st Mon Jun 23 10:58:11 2014 +0200
@@ -50,12 +50,6 @@
"
! !
-!WrappedMethod class methodsFor:'others'!
-
-version_CVS
- ^ '$Header: /cvs/stx/stx/libbasic3/WrappedMethod.st,v 1.41 2014-06-23 08:56:35 cg Exp $'
-! !
-
!WrappedMethod class methodsFor:'registration'!
allInstancesDo:aBlock
@@ -66,8 +60,7 @@
AllWrappedMethods isNil ifTrue:[^ #() ].
^ AllWrappedMethods
select:[:m |
- "/ must double check - as this is a weak set, it gets cleaned up with
- "/ a delay.
+ "/ must double check - as this is a weak set, it gets cleaned up with a delay.
m mclass notNil
]
as:OrderedCollection
@@ -505,7 +498,15 @@
!WrappedMethod class methodsFor:'documentation'!
+version
+ ^ '$Header: /cvs/stx/stx/libbasic3/WrappedMethod.st,v 1.42 2014-06-23 08:58:11 cg Exp $'
+!
+
+version_CVS
+ ^ '$Header: /cvs/stx/stx/libbasic3/WrappedMethod.st,v 1.42 2014-06-23 08:58:11 cg Exp $'
+!
+
version_SVN
- ^ '$Id: WrappedMethod.st,v 1.41 2014-06-23 08:56:35 cg Exp $'
+ ^ '$Id: WrappedMethod.st,v 1.42 2014-06-23 08:58:11 cg Exp $'
! !