#OTHER
class: SelectionInListView
changed: #keyPress:x:y:
care for nonstrings in key-press search
--- a/SelectionInListView.st Wed Sep 30 04:03:43 2015 +0000
+++ b/SelectionInListView.st Wed Sep 30 22:10:29 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
].