[Pharo-project] Problem in OBCmdCreateCategory (and probably Rename...)
renggli at gmail.com
Fri May 13 22:48:34 CEST 2011
I cannot reproduce the problem. What image are you using?
On 13 May 2011 16:14, Friedrich Dominicus <frido at q-software-solutions.de> wrote:
> I'M not sure how to send patches and so we go.
> the execute implementation of the above class give an error
> while calling self categories sorted
> Set does not understand ordered is the message.
> Well I hacked it like this:
> | categories category before |
> categories := self categories asOrderedCollection sorted.
> category := OBCompletionRequest new
> assisted: true;
> collection: categories;
> prompt: 'Add Category';
> category isNil ifTrue: [ ^ self ].
> before := requestor children
> at: requestor selection + 1
> ifAbsent: [ nil ].
> target organization
> addCategory: category
> before: (before isNil
> ifFalse: [ before name ]).
> select: (target categoryNodeNamed: category)
> with: requestor announcer
> Probably bad as hell but "it works"
More information about the Pharo-project