# HG changeset patch
# User Claus Gittinger <cg@exept.de>
# Date 1478601040 -3600
# Node ID 31a9769be125aaefbfc1d453835e8fa38fb9d389
# Parent  81f5cd10ee508644c4034d722dad86fa6db3c4b6
#QUALITY by cg
class: SmallSense::CodeHighlightingService
changed: #initialize

diff -r 81f5cd10ee50 -r 31a9769be125 SmallSense__CodeHighlightingService.st
--- a/SmallSense__CodeHighlightingService.st	Sun Nov 06 11:25:33 2016 +0100
+++ b/SmallSense__CodeHighlightingService.st	Tue Nov 08 11:30:40 2016 +0100
@@ -152,12 +152,14 @@
                 on:[:interval |
                     ControlInterrupt handle:[:ex |
                         (codeView topView isKindOf:DebugView) ifTrue:[
-                            Transcript showCR:'halt ignored in debugger''s syntax job'.
+                            'CodeHighlighter [info]: halt ignored in debugger''s syntax job' errorPrintCR.
                             ex proceed.
                         ].
                         ex reject.
                     ] do:[
                         Error handle:[:ex |
+                            ('CodeHighlighter [info]: Error caught while processing source: ',ex description) errorPrintCR.
+                            ex suspendedContext fullPrintAll.
                             (Dialog confirm:('Error while processing source:\\',ex description,'\\Debug ?') withCRs)
                             ifTrue:[
                                 ex reject.