changeset 81535 | db073d1733ab |
parent 81534 | c32ebdcbe8ca |
--- a/src/Pure/global_theory.ML Mon Dec 02 11:22:44 2024 +0100 +++ b/src/Pure/global_theory.ML Mon Dec 02 11:36:53 2024 +0100 @@ -89,7 +89,7 @@ |> maps (fn (name, thms) => Thm_Name.list (name, Position.none) thms); fun pretty_thm_name ctxt = - Facts.pretty_thm_name (Context.Proof ctxt) (facts_of (Proof_Context.theory_of ctxt)); + Facts.pretty_thm_name ctxt (facts_of (Proof_Context.theory_of ctxt)); val print_thm_name = Pretty.string_of oo pretty_thm_name;