src/Pure/Isar/obtain.ML
changeset 12325 4966dae8fa62
parent 12145 c38a7efa3afb
child 12350 5fad0e7129c3
--- a/src/Pure/Isar/obtain.ML	Thu Nov 29 01:50:50 2001 +0100
+++ b/src/Pure/Isar/obtain.ML	Thu Nov 29 01:51:06 2001 +0100
@@ -107,7 +107,7 @@
     |> Proof.enter_forward
     |> Proof.begin_block
     |> Proof.fix_i [([thesisN], None)]
-    |> Proof.assume_i [((thatN, [Method.intro_local]), [(that_prop, ([], []))])]
+    |> Proof.assume_i [((thatN, [RuleContext.intro_query_local None]), [(that_prop, ([], []))])]
     |> (fn state' =>
       state'
       |> Proof.from_facts chain_facts