src/Pure/Isar/expression.ML
changeset 52119 90ba620333d0
parent 52118 2a976115c7c3
child 52140 88a69da5d3fa
child 52143 36ffe23b25f8
     1.1 --- a/src/Pure/Isar/expression.ML	Wed May 22 22:56:17 2013 +0200
     1.2 +++ b/src/Pure/Isar/expression.ML	Wed May 22 22:56:17 2013 +0200
     1.3 @@ -855,7 +855,7 @@
     1.4    in setup_proof after_qed propss eqns goal_ctxt end;
     1.5  
     1.6  val activate_proof = Context.proof_map ooo Locale.add_registration;
     1.7 -val activate_local_theory = Local_Theory.target ooo activate_proof;
     1.8 +val activate_local_theory = Local_Theory.surface_target ooo activate_proof;
     1.9  val add_registration = Local_Theory.raw_theory o Context.theory_map ooo Locale.add_registration;
    1.10  fun add_dependency locale dep_morph mixin export =
    1.11    (Local_Theory.raw_theory ooo Locale.add_dependency locale) dep_morph mixin export