author | Merge Script |
Thu, 01 Oct 2015 06:52:46 +0200 | |
branch | jv |
changeset 5430 | 828466a23035 |
parent 5428 | f2c23ea06402 (current diff) |
parent 5429 | 1c08a8812faa (diff) |
child 5444 | cd4f2b359bfe |
--- 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 ].