--- a/SourceCodeManagerUtilities.st	Sun Feb 05 04:51:53 2017 +0000
+++ b/SourceCodeManagerUtilities.st	Sun Feb 05 11:39:58 2017 +0100
@@ -3456,15 +3456,8 @@
      perProjectInfoV1 perProjectInfoV2 
      filesInRepositoryV1 filesInRepositoryV2
      filesAddedInV2 filesDeletedInV2 filesModified filesReallyModified
-     unchanged
-     classesNotInRepositoryV1 classesNotInRepositoryV2 
-     classesInRepositoryV1 classesInRepositoryV2
-     "filesNotInImage" classesDeletedInRepositoryV1 classesDeletedInRepositoryV2
-     classesModified classesNotReallyModified classesReallyModified classesNewerInRepository 
-     "classesAddedInImage extensionMethods"  
-     extensionsInRepositoryV1 extensionsInRepositoryV2 extensionDiffs
-     box doCleanup diffSet def "autoloadedFilesNotInImage" 
-     "autoloadedClassesInImage autoloadedFilesInImage" versionMethodsAndDoitsRejected|
+     unchanged "filesNotInImage" "classesAddedInImage extensionMethods"  
+     extensionsInRepositoryV1 extensionsInRepositoryV2 extensionDiffs diffSet "autoloadedClassesInImage autoloadedFilesInImage" versionMethodsAndDoitsRejected|
 
     module := aProject asPackageId module.
     directory := aProject asPackageId directory.
@@ -3507,14 +3500,6 @@
     filesDeletedInV2 := filesInRepositoryV1 select:[:fileName | (filesInRepositoryV2 includes:fileName) not].
 
     filesModified    := filesInRepositoryV1 select:[:fileName | filesInRepositoryV2 includes:fileName].
-self halt.
-    "/ filesInImage := classesInImage collect:[:cls | cls classBaseFilename] as:Set.
-    "/ autoloadedFilesInImage := autoloadedClassesInImage collect:[:cls | cls classBaseFilename] as:Set.
-
-    "/ any differences ?
-"/    filesNotInImage := perProjectInfo keys reject:[:file | (filesInImage includes:file)].
-"/    filesNotInImage := filesNotInImage reject:[:file | (autoloadedFilesInImage includes:file)].
-"/    filesNotInImage remove:'extensions.st' ifAbsent:[].
 
     "/ to ignore version_xxx methods
     versionMethodsAndDoitsRejected := 
@@ -3638,7 +3623,7 @@
     ^ diffSet
 
     "Created: / 04-02-2017 / 17:27:47 / cg"
-    "Modified: / 05-02-2017 / 04:56:07 / cg"
+    "Modified: / 05-02-2017 / 10:04:50 / cg"
 !
 
 ensureCorrectVersionMethodsInClass:aClass usingManager:aManager