--- a/ActiveHelp.st	Wed Mar 26 22:59:54 2014 +0100
+++ b/ActiveHelp.st	Fri Mar 28 10:51:55 2014 +0100
@@ -218,10 +218,16 @@
 "
 ! !
 
+!ActiveHelp class methodsFor:'initialization'!
+
+initialize
+    Debugging := false.
+! !
+
 !ActiveHelp class methodsFor:'accessing'!
 
 debugging
-    ^ Debugging ? false
+    ^ Debugging
 
     "Modified: / 22-12-2011 / 10:46:30 / cg"
 !
@@ -556,10 +562,11 @@
     ].
 
     Error handle:[:ex |
-        '---------------------' infoPrintCR.
-        ex description infoPrintCR.
-        ex suspendedContext fullPrintAll.
-        ex return
+        InfoPrinting == true ifTrue:[
+            '---------------------' infoPrintCR.
+            ex description infoPrintCR.
+            ex suspendedContext fullPrintAll.
+        ].
     ] do:[
         |sensor|
 
@@ -762,6 +769,8 @@
 !ActiveHelp class methodsFor:'documentation'!
 
 version_CVS
-    ^ '$Header: /cvs/stx/stx/libview2/ActiveHelp.st,v 1.75 2014-02-27 15:03:10 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libview2/ActiveHelp.st,v 1.76 2014-03-28 09:51:55 stefan Exp $'
 ! !
 
+
+ActiveHelp initialize!