hey keith, thanks for quick reply! gui approach is nice. but i am as well looking for a possibility to initialize a magma repository for an seaside web application in the moment it gets deployed ( when #registerAsApplication: is called) but i am not sure how to approach it in the most efficent fashion.

five minutes ago i tried to initialize the repository with the following :

MagmaRepositoryController create: (MagmaLocalLocation default) asString root: Dictionary new; at: 'WABlog' put: Dictionary new.

seemed that it worked.

but i will look at the gui in a second ....

Ah!

now I didnt think of that!

If you have a version of Magma-Seaside that does not have WAStoreRepository create then there is now a gui for creating the repository in the config application.

Go to the Magma Location configuration, click "override" to enable the Magma Control Panel. and in there is the create repository button.

hmm I suppose I should fix what I broke. Do you prefer the gui approach?

Keith

...

"-----------------------------------------------------------------------------------------------------------------

Create the Magma repository in a local directory -----------------------------------------------------------------------------------------------------------------"

WAStoreRepository create.

what should i do instead?

best maritn _______________________________________________ Magma mailing list Magma@lists.squeakfoundation.org http://lists.squeakfoundation.org/mailman/listinfo/magma

___________________________________________________________ All new Yahoo! Mail "The new Interface is stunning in its simplicity and ease of use." - PC Magazine http://uk.docs.yahoo.com/nowyoucan.html

In my new version of WAMagmaRepository I change it to be a subclass of Object... then this happens

help!

Keith

Subject: [BUG][] in MagmaClassIdManager(MaClassIdManager)>>idForClass: {[MaSoftwareError signal: aClass name , ' has no id assigned.']}

here insert explanation of what you were doing, suspect changes you've made and so forth.

5 September 2006 8:36:49 pm

VM: unix - a SmalltalkImage Image: Squeak3.8 [latest update: #6665]

SecurityManager state: Restricted: false FileAccess: true SocketAccess: true Working Dir /media/hda1/squeak/3.8-dan Trusted Dir /media/hda1/squeak/3.8-dan/secure Untrusted Dir /media/hda1/squeak/3.8-dan/My Squeak

[] in MagmaClassIdManager(MaClassIdManager)>>idForClass: {[MaSoftwareError signal: aClass name , ' has no id assigned.']} Arguments and temporary variables: aClass: WAStoreRepository

[] in MagmaClassIdManager(MaClassIdManager)>>idForClass:ifAbsent: {[self maMarked: 'performance'. (index := minimumClasses indexOf: aClass) > ...]} Arguments and temporary variables: aClass: WAStoreRepository aBlock: [] in MagmaClassIdManager(MaClassIdManager)>>idForClass: {[MaSoftwareEr...etc... index: 0

Dictionary>>at:ifAbsent: Receiver: a Dictionary(AnObsoleteWAStoreRepository->121 Array->10 ArrayedCollection->110 Behavior->1...etc... Arguments and temporary variables: key: WAStoreRepository aBlock: [] in MagmaClassIdManager(MaClassIdManager)>>idForClass:ifAbsent: {[sel...etc... assoc: nil Receiver's instance variables: tally: 46 array: #(MaByteSequenceIndex->125 SequenceableCollection->111 UndefinedObject->...etc...

MagmaClassIdManager(MaClassIdManager)>>idForClass:ifAbsent: Receiver: a MagmaClassIdManager Arguments and temporary variables: aClass: WAStoreRepository aBlock: [] in MagmaClassIdManager(MaClassIdManager)>>idForClass: {[MaSoftwareEr...etc... index: 0 Receiver's instance variables: classesById: a Dictionary(1->Metaclass 2->Class 3->MaClassReference 4->MaClassD...etc... idsByClass: a Dictionary(AnObsoleteWAStoreRepository->121 Array->10 ArrayedColl...etc... nextClassId: 130 classDefinitionsById: a Dictionary(1->an OrderedCollection(a MaClassDefinition ...etc... inImageDefinitions: a Dictionary(AnObsoleteWAStoreRepository->a MaClassDefiniti...etc... minimumClasses: #(Metaclass Class MaClassReference MaClassDefinition Boolean Sm...etc...

--- The full stack --- [] in MagmaClassIdManager(MaClassIdManager)>>idForClass: {[MaSoftwareError signal: aClass name , ' has no id assigned.']} [] in MagmaClassIdManager(MaClassIdManager)>>idForClass:ifAbsent: {[self maMarked: 'performance'. (index := minimumClasses indexOf: aClass) > ...]} Dictionary>>at:ifAbsent: MagmaClassIdManager(MaClassIdManager)>>idForClass:ifAbsent: - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - MagmaClassIdManager(MaClassIdManager)>>idForClass: MagmaClassIdManager(MaClassIdManager)>>classDefinitionsForClass: [] in MagmaClassIdManager(MaClassIdManager)>>refreshInImageDefinition: {[:eachClass | (eachClass = aClass or: [self includesIdForClass: eachClass...]} WAStoreRepository class(Behavior)>>withAllSubclassesDo: MagmaClassIdManager(MaClassIdManager)>>refreshInImageDefinition: MagmaClassIdManager>>handleClassModification:using: MaObjectSerializer>>handleClassModification: MagmaSession>>handleClassModification: WeakMessageSend>>valueWithArguments: [] in WeakActionSequenceTrappingErrors>>valueWithArguments:startingFrom: {[answer := each valueWithArguments: anArray]} BlockContext>>on:do: WeakActionSequenceTrappingErrors>>valueWithArguments:startingFrom: [] in WeakActionSequenceTrappingErrors>>valueWithArguments:startingFrom: {[:exc | self valueWithArguments: anArray startingFrom: index + 1. exc pass]} BlockContext>>valueWithPossibleArgs: [] in MethodContext(ContextPart)>>handleSignal: {[(self tempAt: 2) valueWithPossibleArgs: {exception}]} BlockContext>>ensure: MethodContext(ContextPart)>>handleSignal: MaSoftwareError(Exception)>>signal MaSoftwareError(Exception)>>signal: MaSoftwareError class(Exception class)>>signal: [] in MagmaClassIdManager(MaClassIdManager)>>idForClass: {[MaSoftwareError signal: aClass name , ' has no id assigned.']} [] in MagmaClassIdManager(MaClassIdManager)>>idForClass:ifAbsent: {[self maMarked: 'performance'. (index := minimumClasses indexOf: aClass) > ...]} Dictionary>>at:ifAbsent: MagmaClassIdManager(MaClassIdManager)>>idForClass:ifAbsent: MagmaClassIdManager(MaClassIdManager)>>idForClass: MagmaClassIdManager(MaClassIdManager)>>classDefinitionsForClass: [] in MagmaClassIdManager(MaClassIdManager)>>refreshInImageDefinition: {[:eachClass | (eachClass = aClass or: [self includesIdForClass: eachClass...]} ...etc...

___________________________________________________________ All New Yahoo! Mail – Tired of Vi@gr@! come-ons? Let our SpamGuard protect you. http://uk.docs.yahoo.com/nowyoucan.html

Well my cunning ploy was to have the root of a repository to be its own seaside component for displaying its status. I am not sure that this tactic is working since when I tried to reinstate the manual creation method things go astray.

Looks like I shall have to do the sensible thing, have a separate class for the status component.

I do this now

Keith

___________________________________________________________ Inbox full of spam? Get leading spam protection and 1GB storage with All New Yahoo! Mail. http://uk.docs.yahoo.com/nowyoucan.html