diff --git a/src/Spec2-Dialogs/SpSelectDialog.class.st b/src/Spec2-Dialogs/SpSelectDialog.class.st
index b0eaebd1..8f5858d5 100644
--- a/src/Spec2-Dialogs/SpSelectDialog.class.st
+++ b/src/Spec2-Dialogs/SpSelectDialog.class.st
@@ -164,7 +164,9 @@ SpSelectDialog >> items [
 { #category : 'api' }
 SpSelectDialog >> items: aCollection [
 
-	list items: aCollection
+	list items: aCollection.
+	aCollection size > 1
+		ifTrue: [ list selectItem: aCollection first ]
 ]
 
 { #category : 'api' }