--- a/ProjectProblem.st Sun Feb 15 18:20:44 2015 +0100
+++ b/ProjectProblem.st Sun Feb 15 19:10:09 2015 +0100
@@ -1535,9 +1535,9 @@
"return a list of description-actionBlock pairs for possible fixes"
^Array
- with: { 'Add method to project' . [ self doUpdateExtensionMethodsInProject ] }
- with: { 'Move to classes package' . [ self doMoveToClassesPackage ] }
- with: { 'Full update of the project definitions (rescan)' . [ self doUpdateAllProjectDefinitions ] }
+ 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 ] )
! !
!ProjectProblem::ExtensionMethodsClassDoesNotExist methodsFor:'accessing-description'!
@@ -2315,22 +2315,22 @@
package = 'stx' ifTrue:[ ^ #() ].
^ Array
- with: { 'Create as Library' . [ self doCreateAsLibrary ] }
- with: { 'Create as GUI Application' . [ self doCreateAsGUIApplication ] }
- with: { 'Create as non-GUI Application' . [ self doCreateAsNonGUIApplication ] }
+ with: (Array with: 'Create as Library' with: [ self doCreateAsLibrary ] )
+ with: (Array with: 'Create as GUI Application' with: [ self doCreateAsGUIApplication ] )
+ with: (Array with: 'Create as non-GUI Application' with: [ self doCreateAsNonGUIApplication ] )
! !
!ProjectProblem class methodsFor:'documentation'!
version
- ^ '$Header: /cvs/stx/stx/libbasic3/ProjectProblem.st,v 1.42 2015-02-15 17:20:28 cg Exp $'
+ ^ '$Header: /cvs/stx/stx/libbasic3/ProjectProblem.st,v 1.43 2015-02-15 18:10:09 cg Exp $'
!
version_CVS
- ^ '$Header: /cvs/stx/stx/libbasic3/ProjectProblem.st,v 1.42 2015-02-15 17:20:28 cg Exp $'
+ ^ '$Header: /cvs/stx/stx/libbasic3/ProjectProblem.st,v 1.43 2015-02-15 18:10:09 cg Exp $'
!
version_SVN
- ^ '$Id: ProjectProblem.st,v 1.42 2015-02-15 17:20:28 cg Exp $'
+ ^ '$Id: ProjectProblem.st,v 1.43 2015-02-15 18:10:09 cg Exp $'
! !