--- a/MultiSelectionInList.st	Wed May 17 14:26:27 1995 +0200
+++ b/MultiSelectionInList.st	Fri May 19 18:41:01 1995 +0200
@@ -4,7 +4,7 @@
 	 instanceVariableNames:''
 	 classVariableNames:''
 	 poolDictionaries:''
-	 category:'Interface-Framework'
+	 category:'Interface-Support-Models'
 !
 
 !MultiSelectionInList methodsFor:'selections'!
@@ -15,7 +15,7 @@
     selectionIndices := indexHolder value.
     (selectionIndices isNil 
     or:[selectionIndices isEmpty]) ifFalse:[
-        ^ selectionIndices collect:[:index | listHolder value at:index]
+	^ selectionIndices collect:[:index | listHolder value at:index]
     ].
     ^ #()
 ! !