changeset 45375 | 7fe19930dfc9 |
parent 45353 | 68f3e073ee21 |
child 45390 | e29521ef9059 |
--- a/src/Pure/Isar/named_target.ML Sun Nov 06 21:17:45 2011 +0100 +++ b/src/Pure/Isar/named_target.ML Sun Nov 06 21:51:46 2011 +0100 @@ -117,7 +117,7 @@ fun locale_notes locale kind global_facts local_facts lthy = let - val global_facts' = Attrib.map_facts (K I) global_facts; + val global_facts' = Attrib.map_facts (K (Thm.mixed_attribute I)) global_facts; val local_facts' = Element.facts_map (Element.transform_ctxt (Local_Theory.target_morphism lthy)) local_facts; in