--- a/ProjectProblem.st Mon Jan 18 04:53:31 2016 +0000
+++ b/ProjectProblem.st Thu Jan 21 15:26:30 2016 +0100
@@ -2172,15 +2172,17 @@
}.
self countOtherProblemsOfThisKind > 0 ifTrue:[
- ops add:{
- ('Move all listed unpackaged methods to their class package') .
- [ self doMoveAllListedMethodsToClassPackage ]
- }.
-
- ops add:{
- ('Move all listed unpackaged methods to package "%1"' bindWith:package) .
- [ self doMoveAllListedMethodsToPackage ]
- }.
+ (allProblems conform:[:p | p klass package = package]) ifFalse:[
+ ops add:{
+ ('Move all listed unpackaged methods to their owning class package') .
+ [ self doMoveAllListedMethodsToClassPackage ]
+ }.
+ ] ifTrue:[
+ ops add:{
+ ('Move all listed unpackaged methods to package "%1"' bindWith:package) .
+ [ self doMoveAllListedMethodsToPackage ]
+ }.
+ ].
].
^ ops