--- a/extensions.st Sat Mar 02 12:51:42 2019 +0100
+++ b/extensions.st Sat Mar 02 13:10:53 2019 +0100
@@ -513,21 +513,23 @@
!Tools::LintService methodsFor:'private'!
showInfoWindowForLine: lineNo
- | ann |
+ | ann infoApp |
ann := self annotationAtLine: lineNo.
ann isNil ifTrue:[ ^ false ].
- SmallSense::CriticsWindow new
- rule: ann rule;
- codeView: codeView;
- allButOpen;
- openWindowAt: (Screen current pointerPosition - (20@20)).
+ infoApp := SmallSense::CriticsWindow new
+ rule: ann rule;
+ codeView: codeView;
+ allButOpen;
+ openWindowAt: (Screen current pointerPosition - (20@20)).
+ SmallSense::CriticsWindow rememberLastExtentOf:infoApp window.
^true
"Created: / 30-01-2012 / 21:04:39 / Jan Vrany <jan.vrany@fit.cvut.cz>"
"Modified: / 03-12-2014 / 10:00:47 / Jan Vrany <jan.vrany@fit.cvut.cz>"
+ "Modified: / 02-03-2019 / 13:09:34 / Claus Gittinger"
! !
!Tools::NavigationState methodsFor:'aspects - SmallSense'!