Lots and lots of changes...
I hope now that any changes to Smalltalk does not result
in inconsistancy in the packages. I still need
to redesign the class Package as it does too much.
More of the responsibilities need to be put on PackagedClass
and PackagedMethod. The PackageBrowser has got some nice package
pictures!
"{ Package: 'stx:libbasic3' }"
"{ NameSpace: Packages }"
Object subclass:#AbstractPackage
instanceVariableNames:'name category'
classVariableNames:''
poolDictionaries:''
category:'Package'
!
!AbstractPackage class methodsFor:'default'!
defaultCategoryName
^ #'__NoName__'
! !
!AbstractPackage methodsFor:'accessing'!
category
"return the value of the instance variable 'category'.
Is initialized by the initialize method"
^ category
!
category:something
"set the value of the instance variable 'category' (automatically generated)"
category := something.
!
name
"return the value of the instance variable 'name' (automatically generated)"
^ name
!
name:aSymbol
"set the value of the instance variable 'name' (automatically generated)"
self assert:(aSymbol isSymbol). "needed for quick comparison. NO STRINGS!!"
name := aSymbol.
! !
!AbstractPackage methodsFor:'initialization'!
initialize
category := self class defaultCategoryName.
! !
!AbstractPackage methodsFor:'installation / deinstallation'!
install
self subclassResponsibility
!
uninstall
self subclassResponsibility
! !
!AbstractPackage methodsFor:'queries'!
isInCategoryNamed:aName
^ category = aName
! !
!AbstractPackage methodsFor:'queries-type'!
isDolphinPackage
^ false
!
isStxPackage
^ false
! !
!AbstractPackage methodsFor:'saving'!
save
self subclassResponsibility
!
saveAs:aFilename
self subclassResponsibility
! !
!AbstractPackage class methodsFor:'documentation'!
version
^ '$Header: /cvs/stx/stx/libbasic3/packages/AbstractPackage.st,v 1.2 2003-05-09 12:20:48 james Exp $'
! !