# HG changeset patch
# User Stefan Vogel <sv@exept.de>
# Date 1486579287 -3600
# Node ID 62c44bf0d8d577f781a31922bd294a1ce386476f
# Parent  902487791641176b2a742fa4ace62e39f2df2d43
#REFACTORING by stefan
class: WorkspaceApplication
changed: #compilerClassOf:
     refactor return with exception handler

diff -r 902487791641 -r 62c44bf0d8d5 WorkspaceApplication.st
--- a/WorkspaceApplication.st	Wed Feb 08 09:11:17 2017 +0100
+++ b/WorkspaceApplication.st	Wed Feb 08 19:41:27 2017 +0100
@@ -4231,13 +4231,12 @@
 !
 
 compilerClassOf:aWorkspace
-    |compilerClass|
-
-    [    
+    ^ [    
         "/ catch, because it could be a non-edit view there (VT100, TeaTimer etc.)
-        compilerClass := aWorkspace compilerClass. 
-    ] on:MessageNotUnderstood do:[].
-    ^ compilerClass
+        aWorkspace compilerClass. 
+    ] on:MessageNotUnderstood do:[nil].
+
+    "Modified: / 08-02-2017 / 19:26:00 / stefan"
 !
 
 createEvaluationWorkspace