Usman

I also try just returning the container but do not know the expected result.
It "works"

Stef

On Jan 31, 2013, at 12:48 PM, Usman Bhatti wrote:

>
>
>
> On Thu, Jan 31, 2013 at 1:20 PM, St�phane Ducasse <stephane.ducasse@inria.fr> wrote:
> Usman did you check with 1.3 to know if the method was there?
>
> I looked in 1.3. The method is defined on MorphTreeMorph (see sceenshot) but absent from this class in 1.4. Copying and pasting the method from 1.3 to 1.4 in the class does not work, there are some missing instance variables in the code.
> The number of implementing classes for setSelectedMorph: does not change between 1.3 and 1.4. To me it seems that the method was moved to MorphTreeListManager in 1.4. It tried to change the receiver to invoke the method on MorphTreeListManager but there are some other problems then.
>

> <image.png>

>
>
> Stef
>
> On Jan 31, 2013, at 7:03 AM, Usman Bhatti wrote:
>
> >
> >
> >
> > On Thu, Jan 31, 2013 at 2:30 AM, St�phane Ducasse <stephane.ducasse@inria.fr> wrote:
> > Morbid fascination
> > It is late so I may completely off but
> > how many isKindOf: are executed in this method?
> >
> > > ((aSymbol isKindOf: Array)
> > > � � � � � � � and: [aSymbol size > 1 and: [aSymbol first == self nodeListSelector and: [
> > > � � � � � � � � � � � � � � � � � � � aSymbol second == #openPath]]])
> >
> > when �[aSymbol second == #openPath] is not openPath
> > then we go to the next (not mentioning duplicated code inside the method ---- I will vomit)
> > and we restart to execute isKindOf:
> >
> > ((aSymbol isKindOf: Array)
> > � � � � � � � � and: [aSymbol size > 1 and: [aSymbol first == self nodeListSelector and: [
> > � � � � � � � � � � � � � � � � � � � � aSymbol second == #expandAllFromNode:]]])
> >
> > Am'I right?
> > It looks so terrible.
> >
> > Yes. And more so for someone not frequently working with Morphs.
> > So, can someone at least see if the problem can be fixed without a large refactoring that should surely happen, but the glamour bug needs a quick fix. Or at least point to why the missing method on the receiver is abundantly found in the code?
> >
> > usman
> >
> >
> > Stef
> >
> >
> >
> > > update: aSymbol
> > > � � � aSymbol == #selection ifTrue: [^ self listManager updateSelectionFromModel].
> > > � � � ((aSymbol �isKindOf: Array) � � and: [aSymbol size > 1 and: [aSymbol first == #selectItems and: [aSymbol second isCollection]]])
> > > � � � � � � � ifTrue: [^ self selectedItems: aSymbol second].
> > > � � � aSymbol == self nodeListSelector ifTrue: [^ self updateList].
> > > � � � aSymbol == #selectAll ifTrue: [^ self listManager selectAll].
> > > � � � aSymbol == #deselectAll ifTrue: [^ self listManager deselectAll].
> > > � � � ((aSymbol isKindOf: Array)
> > > � � � � � � � and: [aSymbol size > 1 and: [aSymbol first == self nodeListSelector and: [
> > > � � � � � � � � � � � � � � � � � � � aSymbol second == #openPath]]]) "allow directed path opening where multiple trees exist"
> > > � � � � � � � � � � � ifTrue:
> > > � � � � � � � � � � � � � � � [^(self allNodeMorphs at: 1 ifAbsent: [^self])
> > > � � � � � � � � � � � � � � � � � � � openPath: (aSymbol allButFirst: 2)].
> > > � � � ((aSymbol isKindOf: Array)
> > > � � � � � � � and: [aSymbol size > 1 and: [aSymbol first == self nodeListSelector and: [
> > > � � � � � � � � � � � � � � � � � � � aSymbol second == #openItemPath]]]) "allow directed path opening where multiple trees exist"
> > > � � � � � � � � � � � ifTrue:
> > > � � � � � � � � � � � � � � � [^ (self allNodeMorphs at: 1 ifAbsent: [^self])
> > > � � � � � � � � � � � � � � � � � � � openItemPath: (aSymbol allButFirst: 2)].
> > > � � � ((aSymbol isKindOf: Array)
> > > � � � � � � � and: [aSymbol size > 1 and: [aSymbol first == self nodeListSelector and: [
> > > � � � � � � � � � � � � � � � � � � � aSymbol second == #expandAllFromNode:]]])
> > > � � � � � � � � � � � ifTrue:
> > > � � � � � � � � � � � � � � � [^ self expandAllFromNode: aSymbol third].
> > > � � � ((aSymbol isKindOf: Array)
> > > � � � � � � � and: [aSymbol size > 1 and: [aSymbol first == self nodeListSelector and: [
> > > � � � � � � � � � � � � � � � � � � � aSymbol second == #closeItemPath]]]) "allow directed path closing where multiple trees exist"
> > > � � � � � � � � � � � ifTrue:
> > > � � � � � � � � � � � � � � � [^ (self allNodeMorphs at: 1 ifAbsent: [^self])
> > > � � � � � � � � � � � � � � � � � � � closeItemPath: (aSymbol allButFirst: 2)].
> > > � � � ((aSymbol isKindOf: Array)
> > > � � � � � � � and: [aSymbol notEmpty and: [aSymbol first == #openPath]])
> > > � � � � � � � � � � � ifTrue:
> > > � � � � � � � � � � � � � � � [^(self allNodeMorphs at: 1 ifAbsent: [^self])
> > > � � � � � � � � � � � � � � � � � � � openPath: aSymbol allButFirst].
> > > � � � ((aSymbol isKindOf: Array)
> > > � � � � � � � and: [aSymbol size �= 2 and: [aSymbol first = self nodeListSelector and: [
> > > � � � � � � � � � � � � � � � � � � � aSymbol second == #expandRoots]]])
> > > � � � � � � � � � � � ifTrue:
> > > � � � � � � � � � � � � � � � [^self expandRoots].
> > > � � � ((aSymbol isKindOf: Array)
> > > � � � � � � � and: [aSymbol size = 2 and: [aSymbol first = self nodeListSelector]])
> > > � � � � � � � ifTrue: [aSymbol second = #expandAll ifTrue: [^ self expandAll].
> > > � � � � � � � � � � � aSymbol second = #collapseAll ifTrue: [^ self collapseAll]]
> >
> >
> >
>
>
>