From 1061eb505a223ac7cbcec0c5ae9354cd24d9b054 Mon Sep 17 00:00:00 2001
From: herbelin
Date: Mon, 26 Dec 2005 14:06:51 +0000
Subject: Suppression des parseurs et printeurs v7; suppression du traducteur
 (mcanismes de renommage des noms de constantes, de module, de ltac et de
 certaines variables lies de lemmes et de tactiques, mcanisme d'ajout
 d'arguments implicites, etc.)

git-svn-id: svn+ssh://scm.gforge.inria.fr/svn/coq/trunk@7734 85f007b7-540e-0410-9357-904b9bb8a0f7
---
 contrib/xml/proofTree2Xml.ml4 | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

(limited to 'contrib/xml')

diff --git a/contrib/xml/proofTree2Xml.ml4 b/contrib/xml/proofTree2Xml.ml4
index b9d9209038..698c732d2f 100644
--- a/contrib/xml/proofTree2Xml.ml4
+++ b/contrib/xml/proofTree2Xml.ml4
@@ -156,7 +156,7 @@ Pp.ppnl (Pp.(++) (Pp.str
             aux flat_proof old_hyps
         | _ ->
          (****** la tactique employee *)
-	 let prtac = if !Options.v7 then Pptactic.pr_tactic else Pptacticnew.pr_tactic (Global.env()) in
+	 let prtac = Pptacticnew.pr_tactic (Global.env()) in
          let tac = std_ppcmds_to_string (prtac tactic_expr) in
          let tacname= first_word tac in
          let of_attribute = ("name",tacname)::("script",tac)::of_attribute in
-- 
cgit v1.2.3