# HG changeset patch # User wenzelm # Date 1310741461 -7200 # Node ID f035d867fb41f54c175eab20bc3a27b355d0d25f # Parent 60cd0ac63fdb890bd7143e37a15e64388b13b41b Element.activate: leave check of binding where actually applied to the context -- allow internal qualifications, or non-identifier fact names like "assumes *: A" (see also 1183951365de); diff -r 60cd0ac63fdb -r f035d867fb41 src/Pure/Isar/element.ML --- a/src/Pure/Isar/element.ML Fri Jul 15 14:07:12 2011 +0200 +++ b/src/Pure/Isar/element.ML Fri Jul 15 16:51:01 2011 +0200 @@ -526,7 +526,7 @@ fun activate raw_elem ctxt = let val elem = raw_elem |> map_ctxt - {binding = tap (fn b => if Binding.is_empty b then "" else Variable.check_name b), + {binding = I, typ = I, term = I, pattern = I,