diff -r 429b7e780d5a -r c317a60d78b5 Tools__LintAnnotation.st --- a/Tools__LintAnnotation.st Wed Mar 11 06:56:44 2015 +0100 +++ b/Tools__LintAnnotation.st Thu Mar 19 12:04:03 2015 +0100 @@ -1,3 +1,5 @@ +"{ Encoding: utf8 }" + " COPYRIGHT (c) 2006 by eXept Software AG All Rights Reserved @@ -76,9 +78,12 @@ rule notNil ifTrue:[ rule isComposite ifTrue:[ - info := ((rule rules - collect:[:each | '- ',(aView resources string:each infoInToolTip)] as:Set) - asStringCollection asStringWith:Character cr). + info := rule rules + collect:[:each | (aView resources string:each infoInToolTip)] as:Set. + info size > 1 ifTrue:[ + info := info collect:[:each | '- ',each]. + ]. + info := info asStringCollection asStringWith:Character cr. ] ifFalse:[ info := aView resources string:rule infoInToolTip ]. @@ -107,10 +112,10 @@ !LintAnnotation class methodsFor:'documentation'! version - ^ '$Header: /cvs/stx/stx/libtool/Tools__LintAnnotation.st,v 1.5 2015-02-14 02:44:16 cg Exp $' + ^ '$Header: /cvs/stx/stx/libtool/Tools__LintAnnotation.st,v 1.6 2015-03-19 11:04:03 cg Exp $' ! version_CVS - ^ '$Header: /cvs/stx/stx/libtool/Tools__LintAnnotation.st,v 1.5 2015-02-14 02:44:16 cg Exp $' + ^ '$Header: /cvs/stx/stx/libtool/Tools__LintAnnotation.st,v 1.6 2015-03-19 11:04:03 cg Exp $' ! !