Tools__BackgroundSourceProcessingService.st
changeset 14973 5972c23eeb9a
parent 14846 5fab48017422
child 15501 46e2abb0c3e2
--- a/Tools__BackgroundSourceProcessingService.st	Wed Dec 03 11:25:53 2014 +0100
+++ b/Tools__BackgroundSourceProcessingService.st	Wed Dec 03 11:26:39 2014 +0100
@@ -160,29 +160,6 @@
     "Created: / 16-09-2011 / 15:15:14 / Jan Vrany <jan.vrany@fit.cvut.cz>"
 ! !
 
-!BackgroundSourceProcessingService methodsFor:'help'!
-
-flyByHelpTextAtLine:aLineNr
-    |a html rule|
-
-    a := self annotationAtLine:aLineNr.
-    a notNil ifTrue:[
-        (rule := a rule) notNil ifTrue:[
-            ^ 'Lint says: ',rule name.
-"/            html := String streamContents:[:s|
-"/                        s 
-"/                            nextPutAll: '<html>'; 
-"/                            nextPutAll: rule name; 
-"/                            nextPutAll:'<P>';  
-"/                            nextPutLine: rule rationale;
-"/                            nextPutAll: '</html>'. 
-"/                    ].
-"/            ^ html
-        ]
-    ].
-    ^ nil
-! !
-
 !BackgroundSourceProcessingService methodsFor:'initialization'!
 
 initialize
@@ -286,10 +263,10 @@
 !BackgroundSourceProcessingService class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libtool/Tools__BackgroundSourceProcessingService.st,v 1.9 2014-11-19 17:50:02 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libtool/Tools__BackgroundSourceProcessingService.st,v 1.10 2014-12-03 10:26:39 vrany Exp $'
 !
 
 version_CVS
-    ^ '$Header: /cvs/stx/stx/libtool/Tools__BackgroundSourceProcessingService.st,v 1.9 2014-11-19 17:50:02 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libtool/Tools__BackgroundSourceProcessingService.st,v 1.10 2014-12-03 10:26:39 vrany Exp $'
 ! !