--- a/ProjectDefinition.st Sun Jan 08 19:35:09 2012 +0100
+++ b/ProjectDefinition.st Mon Jan 09 11:09:44 2012 +0100
@@ -6554,11 +6554,11 @@
classesInImage ~= classesInDescription ifTrue:[
onlyInImage := (classesInImage reject:[:cls | classesInDescription includes:cls]).
onlyInImage notEmpty ifTrue:[
- Transcript show:'only in image: '; showCR:onlyInImage
+ Transcript show:self name; show:': only in image: '; showCR:onlyInImage
].
onlyInDescription := (classesInDescription reject:[:cls | classesInImage includes:cls]).
onlyInDescription notEmpty ifTrue:[
- Transcript show:'only in description: '; showCR:onlyInDescription
+ Transcript show:self name; show:': only in description: '; showCR:onlyInDescription
].
(Dialog confirm:'The set of classes in the image is different from the listed classes in the project definition.\\Proceed?' withCRs) ifFalse:[
AbortSignal raiseRequest
@@ -6569,7 +6569,7 @@
squeak_vmMaker validateDescription
"
- "Modified: / 31-09-2011 / 18:20:36 / cg"
+ "Modified: / 09-01-2012 / 11:02:59 / cg"
! !
!ProjectDefinition class methodsFor:'testing'!
@@ -6641,11 +6641,11 @@
!ProjectDefinition class methodsFor:'documentation'!
version
- ^ '$Header: /cvs/stx/stx/libbasic/ProjectDefinition.st,v 1.376 2011-12-23 14:09:03 cg Exp $'
+ ^ '$Header: /cvs/stx/stx/libbasic/ProjectDefinition.st,v 1.377 2012-01-09 10:09:44 cg Exp $'
!
version_CVS
- ^ '$Header: /cvs/stx/stx/libbasic/ProjectDefinition.st,v 1.376 2011-12-23 14:09:03 cg Exp $'
+ ^ '$Header: /cvs/stx/stx/libbasic/ProjectDefinition.st,v 1.377 2012-01-09 10:09:44 cg Exp $'
!
version_SVN