diff options
-rw-r--r-- | ekdosis.dtx | 46 |
1 files changed, 24 insertions, 22 deletions
diff --git a/ekdosis.dtx b/ekdosis.dtx index 09ed564..e20075b 100644 --- a/ekdosis.dtx +++ b/ekdosis.dtx | |||
@@ -372,13 +372,13 @@ Running "make install" installs the files in the local TeX tree. | |||
372 | % \end{macrocode} | 372 | % \end{macrocode} |
373 | % Hooks | 373 | % Hooks |
374 | % \begin{macrocode} | 374 | % \begin{macrocode} |
375 | \ekvdefinekeys{hooks}{ | 375 | \ekvdefinekeys{ekd@hooks}{ |
376 | store refnumstyle = \ekd@refnumstyle, | 376 | store refnumstyle = \ekd@refnumstyle, |
377 | store postrefnum = \ekd@postrefnum, | 377 | store postrefnum = \ekd@postrefnum, |
378 | initial refnumstyle = \bfseries, | 378 | initial refnumstyle = \bfseries, |
379 | initial postrefnum = ~ | 379 | initial postrefnum = ~ |
380 | } | 380 | } |
381 | \NewDocumentCommand{\SetEkdosisHooks}{m}{\ekvset{hooks}{#1}} | 381 | \NewDocumentCommand{\SetEkdosisHooks}{m}{\ekvset{ekd@hooks}{#1}} |
382 | % \end{macrocode} | 382 | % \end{macrocode} |
383 | % Build and process the list of witnesses and hands. | 383 | % Build and process the list of witnesses and hands. |
384 | % \begin{macrocode} | 384 | % \begin{macrocode} |
@@ -506,6 +506,7 @@ Running "make install" installs the files in the local TeX tree. | |||
506 | \def\setRL{\booltrue{al@rlmode}\pardir TRT\textdir TRT} | 506 | \def\setRL{\booltrue{al@rlmode}\pardir TRT\textdir TRT} |
507 | \def\setLR{\boolfalse{al@rlmode}\pardir TLT \textdir TLT} | 507 | \def\setLR{\boolfalse{al@rlmode}\pardir TLT \textdir TLT} |
508 | } | 508 | } |
509 | \protected\def\LRnum#1{\bgroup\textdir TLT#1\egroup} | ||
509 | \newcounter{ekd@lab} | 510 | \newcounter{ekd@lab} |
510 | \globalcounter{ekd@lab} | 511 | \globalcounter{ekd@lab} |
511 | % \def\unconditional@appin#1{% | 512 | % \def\unconditional@appin#1{% |
@@ -642,7 +643,7 @@ Running "make install" installs the files in the local TeX tree. | |||
642 | "pg_ii")}% | 643 | "pg_ii")}% |
643 | \luadirect{tex.sprint(ekdosis.removesp(\luastringN{#2}))}% | 644 | \luadirect{tex.sprint(ekdosis.removesp(\luastringN{#2}))}% |
644 | \ekd@isinappfalse} | 645 | \ekd@isinappfalse} |
645 | \def\current@ref@arg#1#2{{\textdir TLT% | 646 | \def\current@ref@arg#1#2{{%\textdir TLT% |
646 | \unexpanded\expandafter{\ekd@refnumstyle}% | 647 | \unexpanded\expandafter{\ekd@refnumstyle}% |
647 | \ifnum% | 648 | \ifnum% |
648 | \getpagerefnumber{#1} | 649 | \getpagerefnumber{#1} |
@@ -660,10 +661,10 @@ Running "make install" installs the files in the local TeX tree. | |||
660 | = | 661 | = |
661 | \getrefnumber{\luadirect{tex.sprint(ekdosis.getprevnotelab())}} | 662 | \getrefnumber{\luadirect{tex.sprint(ekdosis.getprevnotelab())}} |
662 | \else | 663 | \else |
663 | \getrefnumber{#1}% | 664 | \LRnum{\getrefnumber{#1}}% issue the no |
664 | \fi% | 665 | \fi% |
665 | }% | 666 | }% |
666 | {\getrefnumber{#1}}% | 667 | {\LRnum{\getrefnumber{#1}}}% issue the no |
667 | \else | 668 | \else |
668 | \ifsubsq@unit% | 669 | \ifsubsq@unit% |
669 | % | 670 | % |
@@ -672,26 +673,27 @@ Running "make install" installs the files in the local TeX tree. | |||
672 | = | 673 | = |
673 | \getrefnumber{\luadirect{tex.sprint(ekdosis.getprevnotelab())}} | 674 | \getrefnumber{\luadirect{tex.sprint(ekdosis.getprevnotelab())}} |
674 | \else | 675 | \else |
675 | \getrefnumber{#1}% | 676 | \LRnum{\getrefnumber{#1}}% issue the no |
676 | \fi | 677 | \fi |
677 | % | 678 | % |
678 | \else | 679 | \else |
679 | \getrefnumber{#1}% | 680 | \LRnum{\getrefnumber{#1}}% issue the no |
680 | \fi | 681 | \fi |
681 | \fi | 682 | \fi |
682 | % | 683 | % |
683 | \else | 684 | \else |
684 | \getrefnumber{#1}--% | 685 | \LRnum{\getrefnumber{#1}}--% |
685 | \getrefnumber{#2}% | 686 | \LRnum{\getrefnumber{#2}}% issue the nos |
686 | \fi% | 687 | \fi% |
687 | \else | 688 | \else |
688 | \getrefnumber{#1}--% | 689 | \LRnum{\getrefnumber{#1}}--% |
689 | \getpagerefnumber{#2}.% | 690 | \LRnum{\getpagerefnumber{#2}}.% |
690 | \getrefnumber{#2}% | 691 | \LRnum{\getrefnumber{#2}}% issue pg and ln nos |
691 | \fi% | 692 | \fi% |
692 | }\unexpanded\expandafter{\ekd@postrefnum}% | 693 | }\unexpanded\expandafter{\ekd@postrefnum}% |
693 | }% | 694 | }% |
694 | \def\current@ref{{\textdir TLT\unexpanded\expandafter{\ekd@refnumstyle}% | 695 | \def\current@ref{{%\textdir TLT% |
696 | \unexpanded\expandafter{\ekd@refnumstyle}% | ||
695 | \ifnum% | 697 | \ifnum% |
696 | \getpagerefnumber{\luadirect{tex.sprint(ekdosis.getlnlab())}-b} | 698 | \getpagerefnumber{\luadirect{tex.sprint(ekdosis.getlnlab())}-b} |
697 | = | 699 | = |
@@ -708,9 +710,9 @@ Running "make install" installs the files in the local TeX tree. | |||
708 | = | 710 | = |
709 | \getrefnumber{\luadirect{tex.sprint(ekdosis.getprevlnlab())}-b} | 711 | \getrefnumber{\luadirect{tex.sprint(ekdosis.getprevlnlab())}-b} |
710 | \else | 712 | \else |
711 | \getrefnumber{\luadirect{tex.sprint(ekdosis.getlnlab())}-b}% | 713 | \LRnum{\getrefnumber{\luadirect{tex.sprint(ekdosis.getlnlab())}-b}}% issue the no |
712 | \fi% | 714 | \fi% |
713 | }{\getrefnumber{\luadirect{tex.sprint(ekdosis.getlnlab())}-b}}% | 715 | }{\LRnum{\getrefnumber{\luadirect{tex.sprint(ekdosis.getlnlab())}-b}}}% issue the no |
714 | \else | 716 | \else |
715 | \ifsubsq@unit% | 717 | \ifsubsq@unit% |
716 | % | 718 | % |
@@ -719,22 +721,22 @@ Running "make install" installs the files in the local TeX tree. | |||
719 | = | 721 | = |
720 | \getrefnumber{\luadirect{tex.sprint(ekdosis.getprevlnlab())}-b} | 722 | \getrefnumber{\luadirect{tex.sprint(ekdosis.getprevlnlab())}-b} |
721 | \else | 723 | \else |
722 | \getrefnumber{\luadirect{tex.sprint(ekdosis.getlnlab())}-b}% | 724 | \LRnum{\getrefnumber{\luadirect{tex.sprint(ekdosis.getlnlab())}-b}}% issue the no |
723 | \fi | 725 | \fi |
724 | % | 726 | % |
725 | \else | 727 | \else |
726 | \getrefnumber{\luadirect{tex.sprint(ekdosis.getlnlab())}-b}% | 728 | \LRnum{\getrefnumber{\luadirect{tex.sprint(ekdosis.getlnlab())}-b}}% issue the no |
727 | \fi | 729 | \fi |
728 | \fi | 730 | \fi |
729 | % | 731 | % |
730 | \else | 732 | \else |
731 | \getrefnumber{\luadirect{tex.sprint(ekdosis.getlnlab())}-b}--% | 733 | \LRnum{\getrefnumber{\luadirect{tex.sprint(ekdosis.getlnlab())}-b}}--% |
732 | \getrefnumber{\luadirect{tex.sprint(ekdosis.getlnlab())}-e}% | 734 | \LRnum{\getrefnumber{\luadirect{tex.sprint(ekdosis.getlnlab())}-e}}% issue the nos |
733 | \fi% | 735 | \fi% |
734 | \else | 736 | \else |
735 | \getrefnumber{\luadirect{tex.sprint(ekdosis.getlnlab())}-b}--% | 737 | \LRnum{\getrefnumber{\luadirect{tex.sprint(ekdosis.getlnlab())}-b}}--% |
736 | \getpagerefnumber{\luadirect{tex.sprint(ekdosis.getlnlab())}-e}.% | 738 | \LRnum{\getpagerefnumber{\luadirect{tex.sprint(ekdosis.getlnlab())}-e}}.% |
737 | \getrefnumber{\luadirect{tex.sprint(ekdosis.getlnlab())}-e}% | 739 | \LRnum{\getrefnumber{\luadirect{tex.sprint(ekdosis.getlnlab())}-e}}% issue pg and ln nos |
738 | \fi% | 740 | \fi% |
739 | }\unexpanded\expandafter{\ekd@postrefnum}% | 741 | }\unexpanded\expandafter{\ekd@postrefnum}% |
740 | }% | 742 | }% |