diff options
author | Robert Alessi <alessi@robertalessi.net> | 2018-11-19 17:27:25 +0100 |
---|---|---|
committer | Robert Alessi <alessi@robertalessi.net> | 2018-11-19 17:27:25 +0100 |
commit | e7bc24917c1334d4f5ec1dcdcf1730d7867c8a48 (patch) | |
tree | 7168bb6d7d2f18d78b78a4ab4afcd1554d81067e | |
parent | 8021941131ddd111c58766848c74a72fc7d23777 (diff) | |
download | ekdosis-e7bc24917c1334d4f5ec1dcdcf1730d7867c8a48.tar.gz |
made internal commands inaccessible
-rw-r--r-- | ekdosis.dtx | 48 |
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 | ||
575 | ekdosis.testapparatus = function() | 575 | ekdosis.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 |
584 | end | 584 | end |
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.."}" |
601 | end | 601 | end |
602 | 602 | ||
603 | % \end{ekdlua} | 603 | % \end{ekdlua} |