--- a/MCPackage.st Sat Mar 01 23:43:05 2014 +0100
+++ b/MCPackage.st Thu Mar 27 21:44:08 2014 +0100
@@ -115,7 +115,10 @@
!MCPackage methodsFor:'testing'!
isStXPackage
- ^(ProjectDefinition definitionClassForPackage: name) notNil.
+ |c|
+
+ ^(c := ProjectDefinition definitionClassForPackage: name) notNil
+ and:[c isProjectDefinition].
"Created: / 29-05-2013 / 01:46:01 / Jan Vrany <jan.vrany@fit.cvut.cz>"
! !
@@ -123,14 +126,14 @@
!MCPackage class methodsFor:'documentation'!
version
- ^ '$Header: /cvs/stx/stx/goodies/monticello/MCPackage.st,v 1.16 2013-06-22 22:22:00 vrany Exp $'
+ ^ '$Header: /cvs/stx/stx/goodies/monticello/MCPackage.st,v 1.17 2014-03-27 20:44:08 cg Exp $'
!
version_CVS
- ^ '$Header: /cvs/stx/stx/goodies/monticello/MCPackage.st,v 1.16 2013-06-22 22:22:00 vrany Exp $'
+ ^ '$Header: /cvs/stx/stx/goodies/monticello/MCPackage.st,v 1.17 2014-03-27 20:44:08 cg Exp $'
!
version_SVN
- ^ '$Id: MCPackage.st,v 1.16 2013-06-22 22:22:00 vrany Exp $'
+ ^ '$Id: MCPackage.st,v 1.17 2014-03-27 20:44:08 cg Exp $'
! !