Thanks for catching it. I opened a Pharo bug:
https://pharo.fogbugz.com/f/cases/12370/MorphTreeMorph-raises-exception-when-clicking-in-the-empty-area

Doru


On Sat, Dec 7, 2013 at 6:50 PM, Stéphane Ducasse <stephane.ducasse@inria.fr> wrote:

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 checkClickableZone translateBy: 2 @ 0) containsPoint: position ]

Stef
_______________________________________________
Moose-dev mailing list
Moose-dev@iam.unibe.ch
https://www.iam.unibe.ch/mailman/listinfo/moose-dev



--

"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




--
www.tudorgirba.com

"Every thing has its own flow"