X-Git-Url: http://matita.cs.unibo.it/gitweb/?a=blobdiff_plain;ds=inline;f=helm%2Fmatita%2FmatitaGui.ml;h=5c5b24c4d7aaecc2a4700a5a72b0bea9579d84e4;hb=c334523c4ff9b584ac108097fa6430e29f935e8f;hp=5d223208f042f782ee409e890272a15cef3e2441;hpb=b2f2e47efe1e01df81cb7659c30eeb76f1f830da;p=helm.git

diff --git a/helm/matita/matitaGui.ml b/helm/matita/matitaGui.ml
index 5d223208f..5c5b24c4d 100644
--- a/helm/matita/matitaGui.ml
+++ b/helm/matita/matitaGui.ml
@@ -549,7 +549,7 @@ class gui () =
         (tac_w_term (A.Transitivity (loc, hole)));
       connect_button tbar#assumptionButton (tac (A.Assumption loc));
       connect_button tbar#cutButton (tac_w_term (A.Cut (loc, None, hole)));
-      connect_button tbar#autoButton (tac (A.Auto (loc,None,None,None)));
+      connect_button tbar#autoButton (tac (A.Auto (loc,None,None,None,None)));
       MatitaGtkMisc.toggle_widget_visibility
        ~widget:(main#tacticsButtonsHandlebox :> GObj.widget)
        ~check:main#tacticsBarMenuItem;
@@ -568,7 +568,7 @@ class gui () =
       MatitaLog.set_log_callback self#console#log_callback;
       GtkSignal.user_handler :=
         (fun exn ->
-          if Helm_registry.get_bool "matita.catch_top_level_exn" then
+          if not (Helm_registry.get_bool "matita.debug") then
             MatitaLog.error (MatitaExcPp.to_string exn)
           else raise exn);
         (* script *)