src/Pure/Isar/named_target.ML
changeset 45390 e29521ef9059
parent 45375 7fe19930dfc9
child 45488 6d71d9e52369
--- a/src/Pure/Isar/named_target.ML	Mon Nov 07 16:41:16 2011 +0100
+++ b/src/Pure/Isar/named_target.ML	Mon Nov 07 17:00:23 2011 +0100
@@ -117,7 +117,7 @@
 
 fun locale_notes locale kind global_facts local_facts lthy =
   let
-    val global_facts' = Attrib.map_facts (K (Thm.mixed_attribute I)) global_facts;
+    val global_facts' = Attrib.map_facts (K []) global_facts;
     val local_facts' = Element.facts_map
       (Element.transform_ctxt (Local_Theory.target_morphism lthy)) local_facts;
   in