--- a/Tools__LintAnnotation.st	Fri Feb 13 23:44:30 2015 +0100
+++ b/Tools__LintAnnotation.st	Sat Feb 14 03:44:16 2015 +0100
@@ -76,15 +76,15 @@
 
     rule notNil ifTrue:[
         rule isComposite ifTrue:[
-            info := Character cr ,
-                    ((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)
+                            asStringCollection asStringWith:Character cr). 
         ] ifFalse:[
             info := aView resources string:rule infoInToolTip
         ].
 
         ^ aView resources 
-                stringWithCRs:'Lint says: %1' "/ 'Lint says: %1\Click for more info.' 
+                stringWithCRs:'Lint says:\%1' "/ 'Lint says: %1\Click for more info.' 
                 with:info.
     ].
     ^ nil
@@ -107,10 +107,10 @@
 !LintAnnotation class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libtool/Tools__LintAnnotation.st,v 1.4 2015-01-23 12:52:33 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libtool/Tools__LintAnnotation.st,v 1.5 2015-02-14 02:44:16 cg Exp $'
 !
 
 version_CVS
-    ^ '$Header: /cvs/stx/stx/libtool/Tools__LintAnnotation.st,v 1.4 2015-01-23 12:52:33 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libtool/Tools__LintAnnotation.st,v 1.5 2015-02-14 02:44:16 cg Exp $'
 ! !