[Newbies] Fighting again with MC

[Giuseppe Luigi Punzi]

Hi all,

Is the second time I'm having  troubles with simple changes to my 
package :S, and I can't figure out what I'm doing bad.

I'm working in a little app. I did it 2 minor changes writing some 
comments on Doc side of a class, one line on a method commented and so on.

Now, I'm trying to commit to my MC repository, and I get an:
Error: Subscript Out Of Bounds: 1

Following the debugger, seems the error is in:
foreignExtensionMethodsForClass: aClass
    ^ (self foreignExtensionCategoriesForClass: aClass)
        gather: [:cat | (aClass organization listAtCategoryNamed: cat)
                          collect: [:sel | self referenceForMethod: sel 
ofClass: aClass]]

where 'cat' is nil. But I don't know wich Category is this.

Some advice?

Note: Debug Report attached. <cid:part1.02090207.00060503 at lordzealon.com>
-------------- next part --------------
Error: subscript is out of bounds: 1
5 August 2008 7:07:25 pm

VM: Win32 - a SmalltalkImage
Image: Squeak3.10.2 [latest update: #7179]

SecurityManager state:
Restricted: false
FileAccess: true
SocketAccess: true
Working Dir E:\Desarrollo\Squeak3.10.2-7179-glp
Trusted Dir E:\Desarrollo\Squeak3.10.2-7179-glp\Giuseppe
Untrusted Dir C:\My Squeak\Giuseppe

ByteSymbol(Object)>>error:
	Receiver: #''
	Arguments and temporary variables: 
		aString: 	'subscript is out of bounds: 1'
	Receiver's instance variables: 
#''

ByteSymbol(Object)>>errorSubscriptBounds:
	Receiver: #''
	Arguments and temporary variables: 
		index: 	1
	Receiver's instance variables: 
#''

ByteSymbol(Object)>>at:
	Receiver: #''
	Arguments and temporary variables: 
		index: 	1
	Receiver's instance variables: 
#''

ByteSymbol>>at:
	Receiver: #''
	Arguments and temporary variables: 
		index: 	1
	Receiver's instance variables: 
#''


--- The full stack ---
ByteSymbol(Object)>>error:
ByteSymbol(Object)>>errorSubscriptBounds:
ByteSymbol(Object)>>at:
ByteSymbol>>at:
 - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - -
ByteSymbol(SequenceableCollection)>>first
PackageInfo>>isForeignClassExtension:
[] in PackageInfo>>foreignExtensionCategoriesForClass: {[:cat | self isForeignClassExtension: cat]}
Array(SequenceableCollection)>>select:
PackageInfo>>foreignExtensionCategoriesForClass:
PackageInfo>>foreignExtensionMethodsForClass:
PackageInfo>>coreMethodsForClass:
[] in PackageInfo>>coreMethods {[:class | self coreMethodsForClass: class]}
[] in OrderedCollection(Collection)>>gather: {[:ea | stream   nextPutAll: (aBlock value: ea)]}
OrderedCollection>>do:
[] in OrderedCollection(Collection)>>gather: {[:stream | self   do: [:ea | stream     nextPutAll: (aBlock value: ea)]]}
Array class(SequenceableCollection class)>>streamContents:
OrderedCollection(Collection)>>gather:
PackageInfo>>coreMethods
PackageInfo>>methods
MCPackage>>snapshot
MCWorkingCopy>>newVersionWithName:message:
[] in MCWorkingCopy>>newVersion {[:pair | self newVersionWithName: pair first message: pair last]}
Array(Object)>>ifNotNilDo:
MCWorkingCopy>>newVersion
MCWorkingCopyBrowser>>saveVersion
PluggableButtonMorphPlus(PluggableButtonMorph)>>performAction
PluggableButtonMorphPlus>>performAction
[] in PluggableButtonMorphPlus(PluggableButtonMorph)>>mouseUp: {[:m | (m containsPoint: evt cursorPoint)   ifTrue: [m performAction]]}
Array(SequenceableCollection)>>do:
PluggableButtonMorphPlus(PluggableButtonMorph)>>mouseUp:
PluggableButtonMorphPlus>>mouseUp:
PluggableButtonMorphPlus(Morph)>>handleMouseUp:
MouseButtonEvent>>sentTo:
PluggableButtonMorphPlus(Morph)>>handleEvent:
PluggableButtonMorphPlus(Morph)>>handleFocusEvent:
[] in HandMorph>>sendFocusEvent:to:clear: {[ActiveHand := self.  ActiveEvent := anEvent.  e := anEvent     transformedB...]}
[] in PasteUpMorph>>becomeActiveDuring: {[aBlock value]}
BlockContext>>on:do:
PasteUpMorph>>becomeActiveDuring:
HandMorph>>sendFocusEvent:to:clear:
HandMorph>>sendEvent:focus:clear:
HandMorph>>sendMouseEvent:
HandMorph>>handleEvent:
HandMorph>>processEvents
[] in WorldState>>doOneCycleNowFor: {[:h |  ActiveHand := h.  h processEvents.  capturingGesture := capturingGest...]}
Array(SequenceableCollection)>>do:
WorldState>>handsDo:
WorldState>>doOneCycleNowFor:
WorldState>>doOneCycleFor:
PasteUpMorph>>doOneCycle
[] in Project class>>spawnNewProcess {[[World doOneCycle.  Processor yield.  false] whileFalse.  nil]}
[] in BlockContext>>newProcess {[self value.  Processor terminateActive]}