changeset 47005 | 421760a1efe7 |
parent 46906 | 3c1787d46935 |
child 47249 | c0481c3c2a6c |
--- a/src/Pure/Isar/attrib.ML Sun Mar 18 12:51:44 2012 +0100 +++ b/src/Pure/Isar/attrib.ML Sun Mar 18 13:04:22 2012 +0100 @@ -92,9 +92,7 @@ end; fun add_attribute name att comment thy = thy - |> Attributes.map - (Name_Space.define (Proof_Context.init_global thy) true (Sign.naming_of thy) - (name, (att, comment)) #> snd); + |> Attributes.map (Name_Space.define (Context.Theory thy) true (name, (att, comment)) #> snd); (* name space *)