I cannot reproduce the problem. What image are you using? Lukas On 13 May 2011 16:14, Friedrich Dominicus <frido@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: execute     | categories category before |     categories := self categories asOrderedCollection sorted.                  ^^^^^^^^^^^^^^^^^^^     category := OBCompletionRequest new         assisted: true;         collection: categories;         prompt: 'Add Category';         signal.     category isNil ifTrue: [ ^ self ].     before := requestor children         at: requestor selection + 1         ifAbsent: [ nil ].     target organization         addCategory: category         before: (before isNil             ifFalse: [ before name ]).     self         select: (target categoryNodeNamed: category)         with: requestor announcer
Probably bad as hell but "it works"
Regards Friedrich
-- Lukas Renggli www.lukas-renggli.ch