From: Claudio Sacerdoti Coen <claudio.sacerdoticoen@unibo.it>
Date: Thu, 12 Oct 2006 08:06:48 +0000 (+0000)
Subject: Bug fixed: the conversion was done with the wront argument (a sort of typo).
X-Git-Tag: make_still_working~6761
X-Git-Url: http://matita.cs.unibo.it/gitweb/?a=commitdiff_plain;h=8c3aef9fbe24897abe1d9e92f8138ba01eaa3067;p=helm.git

Bug fixed: the conversion was done with the wront argument (a sort of typo).
---

diff --git a/helm/software/components/tactics/declarative.ml b/helm/software/components/tactics/declarative.ml
index ef052cfcb..75f56f2b6 100644
--- a/helm/software/components/tactics/declarative.ml
+++ b/helm/software/components/tactics/declarative.ml
@@ -59,7 +59,7 @@ let by_term_we_proved ~dbd t ty id ty' =
            Tacticals.then_
             ~start:(Tactics.change
               ~pattern:(ProofEngineTypes.conclusion_pattern None)
-              (fun _ metasenv ugraph -> ty',metasenv,ugraph))
+              (fun _ metasenv ugraph -> ty,metasenv,ugraph))
             ~continuation:just
       )
    | Some id ->