changeset 47005 | 421760a1efe7 |
parent 46775 | 6287653e63ec |
child 48992 | 0518bf89c777 |
--- a/src/Pure/Isar/method.ML Sun Mar 18 12:51:44 2012 +0100 +++ b/src/Pure/Isar/method.ML Sun Mar 18 13:04:22 2012 +0100 @@ -326,9 +326,7 @@ end; fun add_method name meth comment thy = thy - |> Methods.map - (Name_Space.define (Proof_Context.init_global thy) true (Sign.naming_of thy) - (name, (meth, comment)) #> snd); + |> Methods.map (Name_Space.define (Context.Theory thy) true (name, (meth, comment)) #> snd); (* get methods *)