--- a/SourceCodeManagerUtilities.st	Thu Oct 04 19:26:38 2001 +0200
+++ b/SourceCodeManagerUtilities.st	Mon Oct 08 11:19:31 2001 +0200
@@ -389,7 +389,7 @@
     ).
 
     whatIsBad := Set new.
-    aClass theNonMetaclass allSelectorsAndMethodsDo:[:sel :mthd |
+    aClass theNonMetaclass instAndClassSelectorsAndMethodsDo:[:sel :mthd |
         |setOfLiterals setOfSentMessages|
 
         setOfLiterals := mthd literals.  "/ try without parsing first.
@@ -1431,7 +1431,7 @@
 "/                ^ false
 "/            ]
 "/        ].
-        aClass allSelectorsAndMethodsDo:[:sel :mthd | mthd setPackage:requiredPackage].
+        aClass instAndClassSelectorsAndMethodsDo:[:sel :mthd | mthd setPackage:requiredPackage].
         aClass package:requiredPackage.
         aClass changed:#projectOrganization.
         Smalltalk changed:#projectOrganization with:(Array with:aClass).
@@ -1934,7 +1934,7 @@
     anyChange := false.
     aClass withAllPrivateClassesDo:[:eachClass |
         anyChangeHere := false.
-        eachClass allSelectorsAndMethodsDo:[:sel :mthd | 
+        eachClass instAndClassSelectorsAndMethodsDo:[:sel :mthd | 
             mthd package ~= aPackage ifTrue:[
                 mthd setPackage:aPackage.
                 anyChangeHere := true.
@@ -1954,5 +1954,5 @@
 !SourceCodeManagerUtilities class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libbasic3/SourceCodeManagerUtilities.st,v 1.65 2001-10-04 17:26:38 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libbasic3/SourceCodeManagerUtilities.st,v 1.66 2001-10-08 09:19:29 cg Exp $'
 ! !