Jerome,

Try this:

PluggableListMorph>>scrollToSelection
	| range index |
	index := scroller submorphs 
		indexOf: selectedMorph 
		ifAbsent:[^self].
	((selectedMorph bounds top - scroller offset y) >= 0 and:[
		(selectedMorph bounds bottom - scroller offset y) <
bounds height]) 
			ifTrue:[^self].
	range _ self leftoverScrollRange.
	scrollBar value: (range > 0
		ifTrue: [((index-1 * selectedMorph height) / self
leftoverScrollRange)
					truncateTo: scrollBar
scrollDelta]
		ifFalse: [0]).
	scroller offset: -3 @ (range * scrollBar value)



> -----Original Message-----
> From: squeak-dev-admin at lists.squeakfoundation.org 
> [mailto:squeak-dev-admin at lists.squeakfoundation.org] On 
> Behalf Of Jerome Chan
> Sent: Wednesday, July 03, 2002 12:26 AM
> To: squeak-dev at lists.squeakfoundation.org
> Subject: Scrolling selected item in listmorph to view?
> 
> 
> How do I programmatically make the selected item in a 
> listmorph appear?
> 
>