--- a/SmalltalkCodeGeneratorTool.st	Tue Apr 26 06:50:38 2016 +0200
+++ b/SmalltalkCodeGeneratorTool.st	Wed Apr 27 06:50:59 2016 +0200
@@ -279,7 +279,11 @@
     "install some code for a class.
      If refactory browser stuff is avaliable the refactory tools are used to support undo"
 
-    ^ self compile:theCode forClass:aClass inCategory:cat
+    CompilationErrorHandlerQuery 
+        answer:requestor
+        do:[
+            ^ self compile:theCode forClass:aClass inCategory:cat
+        ]    
 
     "Created: / 05-08-2014 / 16:04:02 / Jan Vrany <jan.vrany@fit.cvut.cz>"
 ! !