aboutsummaryrefslogtreecommitdiff
diff options
context:
space:
mode:
-rw-r--r--ekdosis.dtx48
1 files changed, 24 insertions, 24 deletions
diff --git a/ekdosis.dtx b/ekdosis.dtx
index 858f1a3..86f066c 100644
--- a/ekdosis.dtx
+++ b/ekdosis.dtx
@@ -344,9 +344,9 @@ Running "make install" installs the files in the local TeX tree.
344\AtEndDocument{\luadirect{closestream()}} 344\AtEndDocument{\luadirect{closestream()}}
345% \end{macrocode} 345% \end{macrocode}
346% \begin{macrocode} 346% \begin{macrocode}
347\newbool{ekdstarted} 347\newbool{ekd@started}
348\newbool{doapp} 348\newbool{do@app}
349\newbool{ekdstate} 349\newbool{ekd@state}
350\providebool{al@rlmode} 350\providebool{al@rlmode}
351\newcounter{ekd@lab} 351\newcounter{ekd@lab}
352\def\blfootnote{\gdef\@thefnmark{\relax}\@footnotetext} 352\def\blfootnote{\gdef\@thefnmark{\relax}\@footnotetext}
@@ -364,20 +364,20 @@ Running "make install" installs the files in the local TeX tree.
364 }% 364 }%
365} 365}
366\def\add@apparatus{% 366\def\add@apparatus{%
367 \notbool{ekdstarted}{\add@@apparatus% 367 \notbool{ekd@started}{\add@@apparatus%
368 \global\setbool{ekdstarted}{true}} 368 \global\setbool{ekd@started}{true}}
369 {\testapparatus% 369 {\text@apparatus%
370 \ifbool{doapp}{\add@@apparatus}{}}% 370 \ifbool{do@app}{\add@@apparatus}{}}%
371} 371}
372\NewDocumentCommand{\append}{+m}{% 372\NewDocumentCommand{\append@app}{+m}{%
373 \ifbool{ekdstate}{% 373 \ifbool{ekd@state}{%
374 \luadirect{appin(\luastring{<\zref@extract{ekd:\theekd@lab}{abspage}>}, 374 \luadirect{appin(\luastring{<\zref@extract{ekd:\theekd@lab}{abspage}>},
375 "no")}% 375 "no")}%
376 \luadirect{appin(\luastringN{#1}, "no")}% 376 \luadirect{appin(\luastringN{#1}, "no")}%
377 \luadirect{appin(\luastring{</\zref@extract{ekd:\theekd@lab}{abspage}>}, 377 \luadirect{appin(\luastring{</\zref@extract{ekd:\theekd@lab}{abspage}>},
378 "yes")}% 378 "yes")}%
379 }{}} 379 }{}}
380\NewDocumentCommand{\obappend}{+m}% 380\NewDocumentCommand{\append@ln@app}{+m}%
381 {\luadirect{tex.sprint(ekdosis.mdvappend(\luastringN{#1}))}} 381 {\luadirect{tex.sprint(ekdosis.mdvappend(\luastringN{#1}))}}
382\NewDocumentCommand{\app}{+m}{% 382\NewDocumentCommand{\app}{+m}{%
383 \stepcounter{ekd@lab}% 383 \stepcounter{ekd@lab}%
@@ -385,12 +385,12 @@ Running "make install" installs the files in the local TeX tree.
385 \luadirect{% 385 \luadirect{%
386 ekdosis.storeabspg(\luastring{\zref@extract{ekd:\theekd@lab}{abspage}}, 386 ekdosis.storeabspg(\luastring{\zref@extract{ekd:\theekd@lab}{abspage}},
387 "pg_ii")}% 387 "pg_ii")}%
388 \ifbool{ekdstate}{\add@apparatus}{}% 388 \ifbool{ekd@state}{\add@apparatus}{}%
389 #1} 389 #1}
390\newkeycommand+[\|]{\lem}[wit, alt, pre, post, prewit, postwit][1]{% 390\newkeycommand+[\|]{\lem}[wit, alt, pre, post, prewit, postwit][1]{%
391 #1% 391 #1%
392 |\ifbool{al@rlmode}|% 392 |\ifbool{al@rlmode}|%
393 {|\obappend|{% 393 {|\append@ln@app|{%
394 \bgroup% 394 \bgroup%
395 |\setRL|% 395 |\setRL|%
396 \ifcommandkey{alt}{% 396 \ifcommandkey{alt}{%
@@ -407,7 +407,7 @@ Running "make install" installs the files in the local TeX tree.
407 \ifcommandkey{wit}{ \commandkey{wit}}{}% 407 \ifcommandkey{wit}{ \commandkey{wit}}{}%
408 \ifcommandkey{postwit}{ \commandkey{postwit}}{}:% 408 \ifcommandkey{postwit}{ \commandkey{postwit}}{}:%
409 }}% 409 }}%
410 {|\obappend|{% 410 {|\append@ln@app|{%
411 \ifcommandkey{alt}{% 411 \ifcommandkey{alt}{%
412 \ifcommandkey{pre}{ \commandkey{pre} }{}% 412 \ifcommandkey{pre}{ \commandkey{pre} }{}%
413 \commandkey{alt}% 413 \commandkey{alt}%
@@ -424,7 +424,7 @@ Running "make install" installs the files in the local TeX tree.
424} 424}
425\newkeycommand+[\|]{\rdg}[wit, alt, pre, post, prewit, postwit][1]{% 425\newkeycommand+[\|]{\rdg}[wit, alt, pre, post, prewit, postwit][1]{%
426 |\ifbool{al@rlmode}|% 426 |\ifbool{al@rlmode}|%
427 {|\append|{% 427 {|\append@app|{%
428 \bgroup% 428 \bgroup%
429 |\setRL|% 429 |\setRL|%
430 \ifcommandkey{alt}{% 430 \ifcommandkey{alt}{%
@@ -441,7 +441,7 @@ Running "make install" installs the files in the local TeX tree.
441 \ifcommandkey{wit}{ \commandkey{wit}}{}% 441 \ifcommandkey{wit}{ \commandkey{wit}}{}%
442 \ifcommandkey{postwit}{ \commandkey{postwit}}{}% 442 \ifcommandkey{postwit}{ \commandkey{postwit}}{}%
443 }}% 443 }}%
444 {|\append|{% 444 {|\append@app|{%
445 \ifcommandkey{alt}{% 445 \ifcommandkey{alt}{%
446 \ifcommandkey{pre}{ \commandkey{pre} }{}% 446 \ifcommandkey{pre}{ \commandkey{pre} }{}%
447 \commandkey{alt}% 447 \commandkey{alt}%
@@ -458,14 +458,14 @@ Running "make install" installs the files in the local TeX tree.
458} 458}
459\NewDocumentCommand{\note}{s +m}{% 459\NewDocumentCommand{\note}{s +m}{%
460 \IfBooleanTF{#1}{% 460 \IfBooleanTF{#1}{%
461 \if@pkg@parnotes\append{\parnote{#2}}% 461 \if@pkg@parnotes\append@app{\parnote{#2}}%
462 \else\append{\footnote{#2}}\fi}{\append{#2}}% 462 \else\append@app{\footnote{#2}}\fi}{\append@app{#2}}%
463 \IfBooleanTF{#1}{% 463 \IfBooleanTF{#1}{%
464 \if@pkg@parnotes\parnote{#2}% 464 \if@pkg@parnotes\parnote{#2}%
465 \else\footnote{#2}\fi}{ #2\xspace}% 465 \else\footnote{#2}\fi}{ #2\xspace}%
466} 466}
467\NewDocumentCommand{\apparatus}{}{\luadirect{tex.sprint(appout())}} 467\NewDocumentCommand{\apparatus}{}{\luadirect{tex.sprint(appout())}}
468\NewDocumentCommand{\testapparatus}{}{% 468\NewDocumentCommand{\text@apparatus}{}{%
469 \luadirect{tex.sprint(ekdosis.testapparatus())}} 469 \luadirect{tex.sprint(ekdosis.testapparatus())}}
470\NewDocumentCommand{\EkdosisStart}{}{% 470\NewDocumentCommand{\EkdosisStart}{}{%
471 \stepcounter{ekd@lab}% 471 \stepcounter{ekd@lab}%
@@ -474,9 +474,9 @@ Running "make install" installs the files in the local TeX tree.
474 ekdosis.storeabspg(\luastring{\zref@extract{ekd:\theekd@lab}{abspage}}, 474 ekdosis.storeabspg(\luastring{\zref@extract{ekd:\theekd@lab}{abspage}},
475 "pg_i")}% 475 "pg_i")}%
476} 476}
477\NewDocumentCommand{\EkdosisOn}{}{\setbool{ekdstate}{true}} 477\NewDocumentCommand{\EkdosisOn}{}{\setbool{ekd@state}{true}}
478\NewDocumentCommand{\EkdosisOff}{}{% 478\NewDocumentCommand{\EkdosisOff}{}{%
479 \setbool{ekdstate}{false}% 479 \setbool{ekd@state}{false}%
480} 480}
481\newenvironment{ekdosis}{% 481\newenvironment{ekdosis}{%
482 \EkdosisStart% 482 \EkdosisStart%
@@ -574,12 +574,12 @@ end
574 574
575ekdosis.testapparatus = function() 575ekdosis.testapparatus = function()
576 if pg_ii == pg_i then 576 if pg_ii == pg_i then
577 return "\\boolfalse{doapp}" 577 return "\\boolfalse{do@app}"
578 elseif pg_ii > pg_i then 578 elseif pg_ii > pg_i then
579 pg_i = pg_ii 579 pg_i = pg_ii
580 return "\\booltrue{doapp}" 580 return "\\booltrue{do@app}"
581 else 581 else
582 return "\\boolfalse{doapp}" 582 return "\\boolfalse{do@app}"
583 end 583 end
584end 584end
585 585
@@ -597,7 +597,7 @@ ekdosis.mdvappend = function(str)
597 end 597 end
598 return "\\linelabel{"..i.."}" 598 return "\\linelabel{"..i.."}"
599 .. 599 ..
600 "\\append{\\textbf{\\getrefnumber{"..i.."}} "..str.."}" 600 "\\csname append@app\\endcsname{\\textbf{\\getrefnumber{"..i.."}} "..str.."}"
601end 601end
602 602
603% \end{ekdlua} 603% \end{ekdlua}