--- a/Tools__CodeHighlightingService.st	Sun Aug 23 11:33:31 2015 +0200
+++ b/Tools__CodeHighlightingService.st	Sun Aug 23 16:28:46 2015 +0200
@@ -218,7 +218,7 @@
 
         "textView" modified ifFalse:[
             oldCodeList isNil ifFalse:[
-                oldCode := oldCodeList asStringWithoutEmphasis.
+                oldCode := oldCodeList asStringCollection asStringWithoutEmphasis.
                 "textView" modified ifFalse:[
                     Screen currentScreenQuerySignal answer:codeView device
                     do:[