--- a/Tools__NewSystemBrowser.st Sat Dec 23 13:34:19 2017 +0100
+++ b/Tools__NewSystemBrowser.st Fri Dec 29 15:38:03 2017 +0100
@@ -36585,6 +36585,9 @@
allExtendingPackages := Set new.
self selectedClassesDo:[:eachClass |
+ eachClass theNonMetaclass isProjectDefinition ifTrue:[
+ allExtendingPackages add:eachClass package.
+ ].
eachClass instAndClassSelectorsAndMethodsDo:[:sel :mthd |
mthd isExtension ifTrue:[
allExtendingPackages add:mthd package.
@@ -36594,6 +36597,7 @@
manager utilities comparePackages: allExtendingPackages askForRevision: false extensionsOnly:true.
"Modified (comment): / 04-02-2017 / 18:44:31 / cg"
+ "Modified: / 29-12-2017 / 15:32:37 / stefan"
!
classMenuCompareExtensionsWithRepositoryUsingManagerNamed: sourceCodeManagerClassName