--- a/SourceCodeManagerUtilities.st Thu Jul 25 14:10:03 2002 +0200
+++ b/SourceCodeManagerUtilities.st Thu Jul 25 14:49:10 2002 +0200
@@ -1031,9 +1031,9 @@
and:[change changeClass isMeta]]) not].
diffSet := listHere diffSetsAgainst:listRep.
- changed := diffSet at:#changed.
- onlyHere := diffSet at:#onlyInReceiver.
- onlyInRep := diffSet at:#onlyInArg.
+ changed := diffSet changed.
+ onlyHere := diffSet onlyInReceiver.
+ onlyInRep := diffSet onlyInArg.
changedClassDefinitions := changed select:[:eachChangePair | eachChangePair first isClassDefinitionChange].
changed := changed reject:[:eachChangePair | eachChangePair first isClassDefinitionChange].
@@ -2036,5 +2036,5 @@
!SourceCodeManagerUtilities class methodsFor:'documentation'!
version
- ^ '$Header: /cvs/stx/stx/libbasic3/SourceCodeManagerUtilities.st,v 1.79 2002-02-28 16:36:28 cg Exp $'
+ ^ '$Header: /cvs/stx/stx/libbasic3/SourceCodeManagerUtilities.st,v 1.80 2002-07-25 12:49:10 cg Exp $'
! !