--- a/Tools__BackgroundSourceProcessingService.st	Wed May 04 08:21:04 2016 +0200
+++ b/Tools__BackgroundSourceProcessingService.st	Thu May 05 06:48:38 2016 +0200
@@ -229,38 +229,21 @@
     "Process source code. If `delayed` is true, view should be updated
      asynchronously using #pushUserEvent:"
 
-    Error , HaltInterrupt , BreakPointInterrupt handle:[:ex|
-        |msg|
-
-        "/ Kludge...    
-        (codeView topView class == DebugView) ifTrue:[
-            Transcript showCR: 'Error when processing source code'.
-            ex suspendedContext fullPrintAllOn: Transcript.
-        ] ifFalse:[
-            (ControlInterrupt accepts:ex creator) ifTrue:[
-                "/ also deal with ignored breakpoints here;
-                "/ otherwise, it is almost impossible to place a breakpoint into
-                "/ RB-code, and ignoring it...
-                (DebugView 
-                    isHaltToBeIgnoredIn:(ex suspendedContext method)
-                    atLineNr:1
-                    context:(ex suspendedContext)
-                    modifyEntryCount:false
-                ) ifTrue:[
-                    Transcript showCR:'breakpoint ignored in background processing'.
-                    ^ ex proceed.
+    DebugView 
+        withOptionToIgnoreException:(BreakPointInterrupt,HaltInterrupt,Error) 
+        do:[
+            (Error , HaltInterrupt , BreakPointInterrupt) handle:[:ex|
+                "/ Kludge...    
+                (codeView topView class == DebugView) ifTrue:[
+                    Transcript showCR: 'Error when processing source code'.
+                    ex suspendedContext fullPrintAllOn: Transcript.
+                    ex return.
                 ].
-                msg := ('Halt/Breakpoint while processing source:\',ex description allBold,'\\in: ',ex suspendedContext printString,'\\Debug ?')
-            ] ifFalse:[
-                msg := ('Error while processing source:\',ex description allBold,'\\in: ',ex suspendedContext printString,'\\Debug ?')
-            ].
-            (Dialog confirm:msg withCRs) ifTrue:[
-                ex reject.
+                ex reject "/ go ask for debugging
+            ] do:[
+                self process: delayed
             ]
         ]
-    ] do:[
-        self process: delayed
-    ]
 
     "Created: / 25-02-2014 / 19:57:47 / Jan Vrany <jan.vrany@fit.cvut.cz>"
     "Modified: / 27-03-2015 / 15:56:48 / Jan Vrany <jan.vrany@fit.cvut.cz>"