attached auto

[helm.git] / helm / matita / matitaGui.ml

diff --git a/helm/matita/matitaGui.ml b/helm/matita/matitaGui.ml
index 5a6377b3bb66d768d798a71abaea8386e6b30b3c..ec4d042ff38223eb61cd6151c84b7f19171c8d99 100644 (file)
--- a/helm/matita/matitaGui.ml
+++ b/helm/matita/matitaGui.ml
@@ -144,7 +144,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, hole)));
-      connect_button tbar#autoButton (tac (A.Auto loc));
+      connect_button tbar#autoButton (tac (A.Auto (loc,None)));
         (* quit *)
       self#setQuitCallback (fun () -> exit 0);
         (* log *)