#BUGFIX by stefan
authorStefan Vogel <sv@exept.de>
Thu, 19 Apr 2018 17:45:05 +0200
changeset 4229 35f7bbf9efa4
parent 4228 c7d5c6eb99ec
child 4230 da2bd8a66489
#BUGFIX by stefan class: AbstractSyntaxHighlighter class changed: #formatMethod:in:using:elementsInto: #formatMethod:source:in:using: comon code with SyntaxHighlighter
AbstractSyntaxHighlighter.st
--- a/AbstractSyntaxHighlighter.st	Thu Apr 19 10:49:59 2018 +0200
+++ b/AbstractSyntaxHighlighter.st	Thu Apr 19 17:45:05 2018 +0200
@@ -110,16 +110,6 @@
     "Created: / 9.4.1998 / 16:57:16 / cg"
 !
 
-formatFileContents:aString elementsInto:elementsCollection
-    "format (recolor) a file's contents.
-     Return the text containing font changes and color information.
-     Here, nothing is done ,just for protocol completeness"
-
-    ^ aString
-
-    "Created: / 21-10-2017 / 13:28:35 / cg"
-!
-
 formatMethod:aString in:aClass
     <resource: #obsolete>
     "format (recolor) a method in a given class.
@@ -175,8 +165,6 @@
     "format (recolor) a method in a given class.
      Return the text containing font changes and color information."
 
-    "/ cg: I smell a wumpus: I don't think, all of this must be copied to subclasses
-
     |highlighter tree newText|
 
     aString isNil ifTrue:[^ nil].
@@ -191,7 +179,7 @@
                 ex reject.
             ].
             "Parse error may happen when re-formatting incomplete code while editing"
-            ('SyntaxHighlighter [info]: error during highlight: ' , ex description) infoPrintCR.
+"/            ('SyntaxHighlighter [info]: error during highlight: ' , ex description) infoPrintCR.
             "/ ex suspendedContext fullPrintAll.
         ].
         highlighter notNil ifTrue:[
@@ -202,7 +190,7 @@
         |sourceString|
 
         sourceString := aString string.
-        newText := sourceString "asUnicode16String" asText.
+        newText := sourceString asUnicode16String asText.
         "/ use an array here (instead of the RunArray) - this can be changed much faster using #at:put:
         newText emphasisCollection:(Array new:sourceString size).
 
@@ -238,14 +226,6 @@
     "Modified: / 05-07-2011 / 11:22:20 / cg"
 !
 
-formatMethod:aMethodOrNil source:aString in:aClass using:preferencesOrNil elementsInto: elements
-
-    ^ self formatMethod:aMethodOrNil source:aString in:aClass using:preferencesOrNil
-
-    "Created: / 05-07-2011 / 10:41:14 / cg"
-    "Modified: / 20-07-2011 / 16:29:57 / Jan Vrany <jan.vrany@fit.cvut.cz>"
-!
-
 formatMethodSource:aString in:aClass
     "format (recolor) a method in a given class.
      Return the text containing font changes and color information."