src/Pure/Isar/bundle.ML
changeset 63278 6c963f1fc388
parent 63277 e6d51d9801e4
child 63282 7c509ddf29a5
--- a/src/Pure/Isar/bundle.ML	Fri Jun 10 16:17:33 2016 +0200
+++ b/src/Pure/Isar/bundle.ML	Fri Jun 10 16:28:48 2016 +0200
@@ -159,7 +159,7 @@
   in
     lthy
     |> augment_target (transform_bundle (Local_Theory.standard_morphism_theory lthy) bundle)
-    |> Generic_Target.standard_notes (K true) kind facts
+    |> Generic_Target.standard_notes (op <>) kind facts
     |> Attrib.local_notes kind facts
   end;