--- a/SmallSense__PackagePO.st Thu Jun 19 11:33:05 2014 +0100
+++ b/SmallSense__PackagePO.st Thu Jun 19 13:15:27 2014 +0100
@@ -3,7 +3,7 @@
"{ NameSpace: SmallSense }"
PO subclass:#PackagePO
- instanceVariableNames:'name projectDefinition isJava'
+ instanceVariableNames:'package packageDefinition isJava'
classVariableNames:''
poolDictionaries:''
category:'SmallSense-Core-Interface-PO'
@@ -17,21 +17,43 @@
"Created: / 06-05-2014 / 00:09:28 / Jan Vrany <jan.vrany@fit.cvut.cz>"
!
+label
+ "Return a text to be displayed. The label may be cached
+ `label` instvar."
+
+ ^ package
+
+ "Created: / 19-06-2014 / 12:04:49 / Jan Vrany <jan.vrany@fit.cvut.cz>"
+!
+
name
- ^ name
+ ^ package
"Created: / 06-05-2014 / 00:01:48 / Jan Vrany <jan.vrany@fit.cvut.cz>"
!
-projectDefinition
- projectDefinition isNil ifTrue:[
- projectDefinition := ProjectDefinition definitionClassForPackage: name.
+package
+ ^ package
+!
+
+packageDefinition
+ packageDefinition isNil ifTrue:[
+ packageDefinition := ProjectDefinition definitionClassForPackage:package.
].
- ^ projectDefinition
+ ^ packageDefinition
"Created: / 06-05-2014 / 00:05:44 / Jan Vrany <jan.vrany@fit.cvut.cz>"
! !
+!PackagePO methodsFor:'initialization'!
+
+initializeWithPackage: aStringOrSymbol
+ package := aStringOrSymbol.
+ isJava := false.
+
+ "Created: / 19-06-2014 / 12:02:22 / Jan Vrany <jan.vrany@fit.cvut.cz>"
+! !
+
!PackagePO methodsFor:'testing'!
isSmallSensePackagePO