author | Claus Gittinger <cg@exept.de> |
Wed, 17 Jan 2018 14:09:07 +0100 | |
changeset 6259 | ebe33a983e14 |
parent 6258 | a75c92a4819f |
child 6260 | 69259ae49d3f |
--- a/SelectionInList.st Tue Jan 16 22:14:02 2018 +0100 +++ b/SelectionInList.st Wed Jan 17 14:09:07 2018 +0100 @@ -1,3 +1,5 @@ +"{ Encoding: utf8 }" + " COPYRIGHT (c) 1994 by Claus Gittinger All Rights Reserved @@ -433,8 +435,8 @@ !SelectionInList methodsFor:'queries'! hasSelection - "return true, if there is a selection - " + "return true, if there is a selection" + ^ self numberOfSelections ~~ 0 !