restore lost methods

pharo-spec · Oct 15, 2024 · 9da377b · 9da377b
1 parent e035028
commit 9da377b
Show file tree

Hide file tree

Showing 2 changed files with 17 additions and 0 deletions.
diff --git a/src/Spec2-Adapters-Morphic-Tests/SpMorphicListAdapterTest.class.st b/src/Spec2-Adapters-Morphic-Tests/SpMorphicListAdapterTest.class.st
@@ -1,6 +1,9 @@
 Class {
 	#name : 'SpMorphicListAdapterTest',
 	#superclass : 'TestCase',
+	#instVars : [
+		'presenter'
+	],
 	#category : 'Spec2-Adapters-Morphic-Tests',
 	#package : 'Spec2-Adapters-Morphic-Tests'
 }

diff --git a/src/Spec2-Core/SpListPresenter.class.st b/src/Spec2-Core/SpListPresenter.class.st
@@ -181,6 +181,20 @@ SpListPresenter >> resetListSelection [
 	self selectIndex: 0
 ]
 
+{ #category : 'api' }
+SpListPresenter >> scrollIndex [
+	"Answer a <Number> representing the receiver's element scroll index"
+
+	^ self adapter widget showIndex.
+]
+
+{ #category : 'api' }
+SpListPresenter >> scrollToIndex: anIndex [
+	"Scroll the receiver to the element whose index is anIndex."
+
+	self adapter widget scrollToIndex: anIndex
+]
+
 { #category : 'api' }
 SpListPresenter >> updateList [
 	"Update the list re taking the list defined in `SpAbstractListPresenter>>#model` and filling the list with