MultiSelectionInList.st
changeset 5888 86e2b8b7db7c
parent 3847 bb36b6a3fc7c
child 6509 110f6a02e2d5
--- a/MultiSelectionInList.st	Fri Sep 30 16:44:51 2016 +0200
+++ b/MultiSelectionInList.st	Sat Oct 01 20:39:26 2016 +0200
@@ -1,3 +1,5 @@
+"{ Encoding: utf8 }"
+
 "
  COPYRIGHT (c) 1995 by Claus Gittinger
 	      All Rights Reserved
@@ -11,6 +13,8 @@
 "
 "{ Package: 'stx:libwidg' }"
 
+"{ NameSpace: Smalltalk }"
+
 SelectionInList subclass:#MultiSelectionInList
 	instanceVariableNames:''
 	classVariableNames:''
@@ -141,7 +145,7 @@
     "return the selectionIndex returned when nothing is selected.
      Here, an empty collection is returned."
 
-    ^ Array new
+    ^ #()
 
     "Modified: 20.4.1996 / 13:12:58 / cg"
 ! !
@@ -182,7 +186,7 @@
      or:[selectionIndices isEmpty]]) ifFalse:[
         ^ selectionIndices collect:[:index | listHolder value at:index]
     ].
-    ^ Array new
+    ^ #()
 
     "Modified: 25.4.1996 / 09:09:45 / cg"
 !
@@ -198,5 +202,6 @@
 !MultiSelectionInList class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libwidg/MultiSelectionInList.st,v 1.18 2009-02-26 21:31:35 stefan Exp $'
+    ^ '$Header$'
 ! !
+