src/Pure/Isar/skip_proof.ML

--- a/src/Pure/Isar/skip_proof.ML	Fri Mar 28 19:43:54 2008 +0100
+++ b/src/Pure/Isar/skip_proof.ML	Fri Mar 28 20:02:04 2008 +0100
@@ -24,7 +24,8 @@
   if ! quick_and_dirty then prop
   else error "Proof may be skipped in quick_and_dirty mode only!";
 
-val _ = Context.>> (Theory.add_oracle ("skip_proof", skip_proof));
+val _ = Context.>> (Context.map_theory
+  (Theory.add_oracle ("skip_proof", skip_proof)));
 
 
 (* basic cheating *)