src/Pure/tactic.ML
changeset 31794 71af1fd6a5e4
parent 31251 6ff48aa6142c
child 31945 d5f186aa0bed
     1.1 --- a/src/Pure/tactic.ML	Wed Jun 24 20:52:49 2009 +0200
     1.2 +++ b/src/Pure/tactic.ML	Wed Jun 24 21:28:02 2009 +0200
     1.3 @@ -91,7 +91,7 @@
     1.4  fun rule_by_tactic tac rl =
     1.5    let
     1.6      val ctxt = Variable.thm_context rl;
     1.7 -    val ((_, [st]), ctxt') = Variable.import_thms true [rl] ctxt;
     1.8 +    val ((_, [st]), ctxt') = Variable.import true [rl] ctxt;
     1.9    in
    1.10      (case Seq.pull (tac st) of
    1.11        NONE => raise THM ("rule_by_tactic", 0, [rl])