--- a/SelectionInListView.st Thu Sep 27 16:53:08 2018 +0200
+++ b/SelectionInListView.st Mon Oct 01 13:55:30 2018 +0200
@@ -1,5 +1,3 @@
-"{ Encoding: utf8 }"
-
"
COPYRIGHT (c) 1989 by Claus Gittinger
All Rights Reserved
@@ -4246,12 +4244,14 @@
lineNo := list indexOf:anObject ifAbsent:[nil].
lineNo isNil ifTrue:[
s := anObject string.
- lineNo := list findFirst:[:el | s = el string]
+ lineNo := list findFirst:[:el | el notNil and:[s = el string]]
].
].
lineNo ~~ 0 ifTrue:[
self setSelection:lineNo
]
+
+ "Modified: / 01-10-2018 / 11:17:16 / Maren"
!
setSelection:aNumberOrNilOrCollection