Thanks Doug!
Works now.

I see you decided to lose the method-length pane height. I wonder why,
it was pretty neat.

I was just looking at ListItemWrapper, which has lots of one-line
methods, and thinking that they could be compact-printed as
canBeDragged ^true
which would still be pretty clear, and leave more room for the
intersting methods...

Daniel

Doug Way <dway at riskmetrics.com> wrote:
> 
> danielv at netvision.net.il wrote:
> > 
> > Just loaded Whisker 9.2 in, used the open menu->whisker browser, and I
> > got the following...
> > 
> > Anyone have a version that works on current Squeak?
> 
> You do need to also load the 3.1alpha-4173 update changeset which is mentioned at the bottom of the Whisker website.  (see http://www.mindspring.com/~dway/smalltalk/whisker.html )
> 
> Other than that, I just tried loading Whisker0.92-Sq3.0.cs and Whisker-31alpha-4173update.1.cs into a freshly downloaded 3.2alpha-4566 image, and it seems to work fine.
> 
> By the way, I'll be releasing a new version of Whisker soon (0.93), mostly I'm just waiting for Squeak 3.1/3.2 to be finalized first.
> 
> - Doug Way
>   dway at riskmetrics.com
> 
> 
> > Thanks
> > Daniel
> > 
> > 1 December 2001 9:35:44 pm
> > 
> > VM: unix - Squeak3.1alpha of 7 March 2001 [latest update: #4173]
> > Image: Squeak3.2alpha [latest update: #4542]
> > 
> > MultiSelectHierarchicalListMorph(Object)>>doesNotUnderstand:
> >         Receiver: a MultiSelectHierarchicalListMorph(178)
> >         Arguments and temporary variables:
> >                 aMessage:       a Message with selector: #installEventHandlerOn: and
> > arguments: #(an ...etc...
> >         Receiver's instance variables:
> >                 bounds:         0 at 0 corner: 150 at 120
> >                 owner:  nil
> >                 submorphs:      #(a TransformMorph(1460))
> >                 fullBounds:     nil
> >                 color:  Color transparent
> >                 extension:      a MorphExtension (3322) [eventHandler = an EventHandler
> > recipients: ...etc...
> >                 borderWidth:    1
> >                 borderColor:    Color black
> >                 model:  a HierarchicalClassList
> >                 slotName:       nil
> >                 open:   false
> >                 pinSpecs:       nil
> >                 scrollBar:      a ScrollBar(3036)
> >                 scroller:       a TransformMorph(1460)
> >                 retractableScrollBar:   true
> >                 scrollBarOnLeft:        true
> >                 getMenuSelector:        #genericMenu:
> >                 getMenuTitleSelector:   nil
> >                 scrollBarHidden:        nil
> >                 hasFocus:       false
> >                 selectedMorph:  nil
> >                 getListSelector:        #getList
> >                 keystrokeActionSelector:        #arrowKey:from:
> >                 autoDeselect:   true
> >                 expandedForm:   nil
> >                 notExpandedForm:        nil
> >                 columns:        nil
> >                 sortingSelector:        nil
> >                 getSelectionSelector:   nil
> >                 setSelectionSelector:   nil
> >                 potentialDropMorph:     nil
> >                 selectedMorphs:         a SortedCollection()
> >                 getSelectionsSelector:  #getCurrentSelection
> >                 setSelectionsSelector:  #noteNewSelections:
> >                 backgroundShadowStartingString:         nil
> > 
> > MultiSelectHierarchicalListMorph>>list:
> >         Receiver: a MultiSelectHierarchicalListMorph(178)
> >         Arguments and temporary variables:
> >                 aCollection:    #(a ClassInHierarchyWrapper(848) on Object)
> >                 wereExpanded:   #()
> >                 morphList:      an OrderedCollection(an
> > IndentingListItemMorph(2239)'Object')
> >         Receiver's instance variables:
> >                 bounds:         0 at 0 corner: 150 at 120
> >                 owner:  nil
> >                 submorphs:      #(a TransformMorph(1460))
> >                 fullBounds:     nil
> >                 color:  Color transparent
> >                 extension:      a MorphExtension (3322) [eventHandler = an EventHandler
> > recipients: ...etc...
> >                 borderWidth:    1
> >                 borderColor:    Color black
> >                 model:  a HierarchicalClassList
> >                 slotName:       nil
> >                 open:   false
> >                 pinSpecs:       nil
> >                 scrollBar:      a ScrollBar(3036)
> >                 scroller:       a TransformMorph(1460)
> >                 retractableScrollBar:   true
> >                 scrollBarOnLeft:        true
> >                 getMenuSelector:        #genericMenu:
> >                 getMenuTitleSelector:   nil
> >                 scrollBarHidden:        nil
> >                 hasFocus:       false
> >                 selectedMorph:  nil
> >                 getListSelector:        #getList
> >                 keystrokeActionSelector:        #arrowKey:from:
> >                 autoDeselect:   true
> >                 expandedForm:   nil
> >                 notExpandedForm:        nil
> >                 columns:        nil
> >                 sortingSelector:        nil
> >                 getSelectionSelector:   nil
> >                 setSelectionSelector:   nil
> >                 potentialDropMorph:     nil
> >                 selectedMorphs:         a SortedCollection()
> >                 getSelectionsSelector:  #getCurrentSelection
> >                 setSelectionsSelector:  #noteNewSelections:
> >                 backgroundShadowStartingString:         nil
> > 
> > MultiSelectHierarchicalListMorph>>on:list:selected:changeSelected:menu:k
> > eystroke:
> >         Receiver: a MultiSelectHierarchicalListMorph(178)
> >         Arguments and temporary variables:
> >                 anObject:       a HierarchicalClassList
> >                 getListSel:     #getList
> >                 getSelectionsSel:       #getCurrentSelection
> >                 setSelectionsSel:       #noteNewSelections:
> >                 getMenuSel:     #genericMenu:
> >                 keyActionSel:   #arrowKey:from:
> >         Receiver's instance variables:
> >                 bounds:         0 at 0 corner: 150 at 120
> >                 owner:  nil
> >                 submorphs:      #(a TransformMorph(1460))
> >                 fullBounds:     nil
> >                 color:  Color transparent
> >                 extension:      a MorphExtension (3322) [eventHandler = an EventHandler
> > recipients: ...etc...
> >                 borderWidth:    1
> >                 borderColor:    Color black
> >                 model:  a HierarchicalClassList
> >                 slotName:       nil
> >                 open:   false
> >                 pinSpecs:       nil
> >                 scrollBar:      a ScrollBar(3036)
> >                 scroller:       a TransformMorph(1460)
> >                 retractableScrollBar:   true
> >                 scrollBarOnLeft:        true
> >                 getMenuSelector:        #genericMenu:
> >                 getMenuTitleSelector:   nil
> >                 scrollBarHidden:        nil
> >                 hasFocus:       false
> >                 selectedMorph:  nil
> >                 getListSelector:        #getList
> >                 keystrokeActionSelector:        #arrowKey:from:
> >                 autoDeselect:   true
> >                 expandedForm:   nil
> >                 notExpandedForm:        nil
> >                 columns:        nil
> >                 sortingSelector:        nil
> >                 getSelectionSelector:   nil
> >                 setSelectionSelector:   nil
> >                 potentialDropMorph:     nil
> >                 selectedMorphs:         a SortedCollection()
> >                 getSelectionsSelector:  #getCurrentSelection
> >                 setSelectionsSelector:  #noteNewSelections:
> >                 backgroundShadowStartingString:         nil
> > 
> > ...etc...