Fix {Theorem, Lemma}_default_class theory attributes

Fix #11
This commit is contained in:
Nicolas Méric 2022-04-08 12:16:04 +02:00
parent 17df6a271b
commit e3caad804b
1 changed files with 2 additions and 2 deletions

View File

@ -305,7 +305,7 @@ val _ =
{markdown = true, body = true}
(fn meta_args => fn thy =>
let
val ddc = Config.get_global thy Definition_default_class
val ddc = Config.get_global thy Lemma_default_class
val use_Lemma_default = SOME(((ddc = "") ? (K "math_content")) ddc)
in
Onto_Macros.enriched_formal_statement_command
@ -317,7 +317,7 @@ val _ =
{markdown = true, body = true}
(fn meta_args => fn thy =>
let
val ddc = Config.get_global thy Definition_default_class
val ddc = Config.get_global thy Theorem_default_class
val use_Theorem_default = SOME(((ddc = "") ? (K "math_content")) ddc)
in
Onto_Macros.enriched_formal_statement_command