[Moose-dev] Re: Moose 5.0. DNU point:from:

On Dec 7, 2013, at 6:29 PM, Tudor Girba <tudor(a)tudorgirba.com> wrote: apparently Model1 allNamespace allclasses I have the impression that this is when I went from allclasses to Models I got it several times already and again now. Now I can reproduce it each time :) Model1 is selected allclasses is selected and you should click in the empty space below Model1 mouseUp: event on: aNodeMorph ^^^^^^^^^^^^^^^^^^^ nil | path cmdOrCtrl clickedTheCheckbox | "No change if model is locked" clickedTheCheckbox := self clicked: event inTheCheckboxOf: aNodeMorph. self listModel okToChange ifFalse: [^self]. self listModel okToDiscardEdits ifFalse: [^ self]. cmdOrCtrl := self commandOrCrontrolKeyPressed: event. path := (event shiftPressed and: [self isMultiple]) ifTrue: [self shiftSelectMorph: aNodeMorph] ifFalse: [ self autoMultiSelection ifTrue: [self selectedMorphList ifEmpty: [] ifNotEmpty: [:l | l last path collect: [:p | p complexContents]]] ifFalse: [self selectMorph: aNodeMorph multiple: ((cmdOrCtrl and: [self isMultiple]) or: [self autoMultiSelection]) clickedTheCheckBox: clickedTheCheckbox ]]. self selectionUpdateFromViewWhile: [ | selHolder | selHolder := self newSelectionHolderWithNodePath: path. self listModel selection: selHolder]. clickedTheCheckbox ifFalse: [ self lastClickedMorph: aNodeMorph ]. self selectionChanged. Stef