Adapt to tagpdf's push/pop mc commands

This commit is contained in:
Marcel Fabian Krüger 2021-12-16 18:18:31 +01:00
parent c8c32e0f4c
commit bdbeb16c53

View File

@ -49,11 +49,12 @@
\cs_generate_variant:Nn \pdffile_filespec:nnn {ene}
\int_new:N \g__luamml_demo_af_int
\cs_new_protected:Npn \LuaMMLTagAF #1#2 {
\tag_mc_end_push:
\int_gincr:N \g__luamml_demo_af_int
\exp_args:Ne \pdf_object_new:nn{__luamml_demo_\int_use:N \g__luamml_demo_af_int}{dict}
\exp_args:Ne \tagstructbegin{tag=Formula,AF=__luamml_demo_\int_use:N \g__luamml_demo_af_int,#1}
\exp_args:Ne \tag_struct_begin:n{tag=Formula,AF=__luamml_demo_\int_use:N \g__luamml_demo_af_int,#1}
\bool_if:NF \l__luamml_demo_structelem_bool {
\tagmcbegin{tag=Formula}
\tag_mc_begin:n{tag=Formula}
}
#2
\group_begin:
@ -64,9 +65,10 @@
{ \luamml_get_last_mathml_stream:e{}\c_space_tl 0~R}
\group_end:
\bool_if:NF \l__luamml_demo_structelem_bool {
\tagmcend
\tag_mc_end:
}
\tagstructend
\tag_struct_end:
\tag_mc_begin_pop:n{}
}
\NewDocumentCommand\AnnotateFormula{ o m m }{%