refactored
authorClaus Gittinger <cg@exept.de>
Thu, 25 Jul 2002 14:49:10 +0200
changeset 1157 885130aeebd8
parent 1156 29fb7d77797d
child 1158 453b58c2a059
refactored
SourceCodeManagerUtilities.st
--- 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 $'
 ! !