--- a/ChangeSet.st Fri Sep 18 18:15:56 2009 +0200
+++ b/ChangeSet.st Sat Sep 19 13:27:26 2009 +0200
@@ -1984,7 +1984,7 @@
|dispatchSelector|
dispatchSelector := ('process_',(selector copyReplaceAll:$: with:$_)) asSymbol.
-Transcript showCR:dispatchSelector.
+"/ Transcript showCR:dispatchSelector.
(self class implements:dispatchSelector) ifTrue:[
^ self perform:dispatchSelector.
].
@@ -2483,5 +2483,5 @@
!ChangeSet class methodsFor:'documentation'!
version
- ^ '$Header: /cvs/stx/stx/libbasic3/ChangeSet.st,v 1.158 2009-09-17 13:14:17 cg Exp $'
+ ^ '$Header: /cvs/stx/stx/libbasic3/ChangeSet.st,v 1.159 2009-09-19 11:27:26 cg Exp $'
! !