# HG changeset patch # User matilk # Date 1538394930 -7200 # Node ID f836a6ef7bc6b5b664cf9a55a7975242aa2efd91 # Parent ffa93f79e6ae82c05d2c2fe7f986a3d7217debc7 #BUGFIX by Maren class: SelectionInListView changed: #setSelectElement: diff -r ffa93f79e6ae -r f836a6ef7bc6 SelectionInListView.st --- 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