X-Git-Url: http://matita.cs.unibo.it/gitweb/?a=blobdiff_plain;f=matita%2Fcomponents%2Fng_tactics%2Fcontinuationals.ml;h=b1087713009670ef9bcbedcfe8f1cea40942363c;hb=729e08f5fb86b3ffee460fda4577b024ab5888aa;hp=714dad533c46d3f6212d6660effe677451d6cf29;hpb=d284dd23d0e12a62a001d3473eadf4942d12ffaa;p=helm.git

diff --git a/matita/components/ng_tactics/continuationals.ml b/matita/components/ng_tactics/continuationals.ml
index 714dad533..b10877130 100644
--- a/matita/components/ng_tactics/continuationals.ml
+++ b/matita/components/ng_tactics/continuationals.ml
@@ -114,10 +114,6 @@ struct
     | [ [], [], [], `NoTag ] -> true
     | _ -> false
 
-  let of_metasenv metasenv =
-    let goals = List.map (fun (g, _, _) -> g) metasenv in
-    [ zero_pos goals, [], [], `NoTag ]
-  
   let of_nmetasenv metasenv =
     let goals = List.map (fun (g, _) -> g) metasenv in
     [ zero_pos goals, [], [], `NoTag ]