Thanks for catching it. I opened a Pharo bug: https://pharo.fogbugz.com/f/cases/12370/MorphTreeMorph-raises-exception-when...
Doru
On Sat, Dec 7, 2013 at 6:50 PM, Stéphane Ducasse stephane.ducasse@inria.frwrote:
On Dec 7, 2013, at 6:29 PM, Tudor Girba tudor@tudorgirba.com wrote:
I never saw this error. Could you describe exactly what you do?
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
Doru
On Sat, Dec 7, 2013 at 6:14 PM, Stéphane Ducasse < stephane.ducasse@inria.fr> wrote:
Apparently when I move the moose from the finder elements (classes) to the model item I get a DNU point:from:
MoprhTreeListManager>>clicked: event inTheCheckboxOf: aTargetMorph | position |
position := aTargetMorph point: event position from: client. ^ self isCheckList and: [ (aTargetMorph checkClickableZonetranslateBy: 2 @ 0) containsPoint: position ]
Stef _______________________________________________ Moose-dev mailing list Moose-dev@iam.unibe.ch https://www.iam.unibe.ch/mailman/listinfo/moose-dev
-- www.tudorgirba.com
"Every thing has its own flow" _______________________________________________ Moose-dev mailing list Moose-dev@iam.unibe.ch https://www.iam.unibe.ch/mailman/listinfo/moose-dev
Moose-dev mailing list Moose-dev@iam.unibe.ch https://www.iam.unibe.ch/mailman/listinfo/moose-dev