Merge jv
authorMerge Script
Thu, 01 Oct 2015 06:52:46 +0200
branchjv
changeset 5430 828466a23035
parent 5428 f2c23ea06402 (current diff)
parent 5429 1c08a8812faa (diff)
child 5444 cd4f2b359bfe
Merge
SelectionInListView.st
--- a/SelectionInListView.st	Wed Sep 30 15:59:46 2015 +0100
+++ b/SelectionInListView.st	Thu Oct 01 06:52:46 2015 +0200
@@ -2694,7 +2694,7 @@
                     "/ none found.
                     searchPrefix size == 1 ifTrue:[
                         "/ if all start with the same prefix, use the char after the prefix
-                        prefix := (self list collect:[:l | l ? '']) longestCommonPrefixCaseSensitive:false.
+                        prefix := (self list collect:[:l | (l ? '')string]) longestCommonPrefixCaseSensitive:false.
                         prefix isEmptyOrNil ifTrue:[
                             ^ self
                         ].