--- a/SmallSense__SmalltalkLintService.st Wed Nov 19 15:51:14 2014 +0000
+++ b/SmallSense__SmalltalkLintService.st Wed Nov 19 20:56:59 2014 +0000
@@ -229,15 +229,15 @@
| annotations |
(annotations := highlighter annotations) isEmptyOrNil ifTrue:[ ^ nil ].
- annotations do:[:a|
- | l |
+ annotations do:[:annotation|
+ | line |
- (l := a line) isNil ifTrue:[
- l := codeView lineOfCharacterPosition: a startPosition.
- a line: l.
+ (line := annotation line) isNil ifTrue:[
+ line := codeView lineOfCharacterPosition: annotation startPosition.
+ annotation line: line.
].
- l > lineNo ifTrue:[ ^ nil ].
- l == lineNo ifTrue:[ ^ a ].
+ line > lineNo ifTrue:[ ^ nil ].
+ line == lineNo ifTrue:[ ^ annotation ].
].
^nil