--- a/ProjectProblem.st	Wed Feb 25 22:34:01 2015 +0100
+++ b/ProjectProblem.st	Wed Feb 25 23:20:03 2015 +0100
@@ -703,7 +703,9 @@
     "return a list of description-actionBlock pairs for possible fixes"
 
     ^Array
-        with: (Array with: 'Full update of the project definitions (rescan)' with: [ self doUpdateAllProjectDefinitions ])
+        with: (Array 
+                with: ('Full update of the package definition (rescan) of "%1"' bindWith:self klass package)
+                with: [ self doUpdateAllProjectDefinitions ])
 ! !
 
 !ProjectProblem::ClassListedBeforeItsPool methodsFor:'accessing'!
@@ -1578,7 +1580,7 @@
 "/
     ^Array
         with: (Array with: 'Remove from the extensionMethodNames list' with: [ self doRemoveMethodFromExtensionsList ])    
-        with: (Array with: 'Move method into package' with: [ self doMoveMethodToProject ])
+        with: (Array with: ('Move method to package "%1"' bindWith:package) with: [ self doMoveMethodToProject ])
 
     "Created: / 26-07-2012 / 10:41:18 / Jan Vrany <jan.vrany@fit.cvut.cz>"
 ! !
@@ -1620,6 +1622,7 @@
     cls isNil ifTrue:[ ^ false ].
     mthd := cls compiledMethodAt:selector.
     mthd package:(cls package).
+
     UserNotification notify: ('Do not forget to check in the method''s package (or class) ("%1")!!' bindWith:cls package).
     ^true
 !
@@ -1644,9 +1647,15 @@
     "return a list of description-actionBlock pairs for possible fixes"
 
     ^Array
-        with: (Array with: 'Add method to project'    with: [ self doUpdateExtensionMethodsInProject ] )
-        with: (Array with: 'Move to classes package'  with: [ self doMoveToClassesPackage ] )
-        with: (Array with: 'Full update of the project definitions (rescan)' with: [ self doUpdateAllProjectDefinitions ] )
+        with: (Array 
+                    with: ('Add method to package ("%1")' bindWith:package)   
+                    with: [ self doUpdateExtensionMethodsInProject ] )
+        with: (Array 
+                    with: ('Move method to classes package ("%1")' bindWith:self klass package)  
+                    with: [ self doMoveToClassesPackage ] )
+        with: (Array 
+                    with: ('Full update of the package definition (rescan) of "%1"' bindWith:self klass package) 
+                    with: [ self doUpdateAllProjectDefinitions ] )
 ! !
 
 !ProjectProblem::ExtensionMethodsClassDoesNotExist methodsFor:'accessing-description'!
@@ -1715,7 +1724,8 @@
 
     fixes add:
         { 'Create project definition class for project "',superPackage,'"' . 
-                    [ self createPackageDefinitionForSuperclass ]}.
+                    [ self createPackageDefinitionForSuperclass ]
+        }.
 
     ^ fixes
 !
@@ -2133,15 +2143,15 @@
     |moveThisToPackage moveAllToTheirPackage|
 
     moveThisToPackage :=
-        {
-            ('Move method to package ', package) .
+        {                        
+            ('Move method to package "%1"' bindWith:package) .
             [ self doMoveMethodToPackage ]
         }.
 
     self countOtherProblemsOfThisKind > 0 ifTrue:[
         moveAllToTheirPackage :=
             {
-                ('Move all listed unpackaged methods to package ', package) .
+                ('Move all listed unpackaged methods to package "%1"' bindWith:package) .
                 [ self doMoveAllListedMethodsToPackage ]
             }.
 
@@ -2178,9 +2188,7 @@
     m :=  self method.
     ^ m isNil 
         or:[otherProjectDefinitionClasses isEmptyOrNil
-        or:[(otherProjectDefinitionClasses 
-                contains:[:cls | 
-                    cls extensionMethods includes:m]) not]]
+        or:[(otherProjectDefinitionClasses contains:[:cls | cls extensionMethods includes:m]) not]]
 !
 
 description
@@ -2432,14 +2440,14 @@
 !ProjectProblem class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libbasic3/ProjectProblem.st,v 1.44 2015-02-24 23:48:50 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libbasic3/ProjectProblem.st,v 1.45 2015-02-25 22:20:03 cg Exp $'
 !
 
 version_CVS
-    ^ '$Header: /cvs/stx/stx/libbasic3/ProjectProblem.st,v 1.44 2015-02-24 23:48:50 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libbasic3/ProjectProblem.st,v 1.45 2015-02-25 22:20:03 cg Exp $'
 !
 
 version_SVN
-    ^ '$Id: ProjectProblem.st,v 1.44 2015-02-24 23:48:50 cg Exp $'
+    ^ '$Id: ProjectProblem.st,v 1.45 2015-02-25 22:20:03 cg Exp $'
 ! !