aboutsummaryrefslogtreecommitdiff
diff options
context:
space:
mode:
authorRobert Alessi <alessi@robertalessi.net>2020-03-27 16:12:13 +0100
committerRobert Alessi <alessi@robertalessi.net>2020-03-27 16:12:13 +0100
commit0491c65e748a50e9577dff915f2ea4f74b779eb0 (patch)
treeee994d71a1613056027eb634f1580ab2ae8045dc
parent43b431b5fe4c1bc012d095356b5fa2e9615840e7 (diff)
downloadekdosis-0491c65e748a50e9577dff915f2ea4f74b779eb0.tar.gz
no need to store pg_i and pg_ii anymore
-rw-r--r--ekdosis.dtx58
1 files changed, 29 insertions, 29 deletions
diff --git a/ekdosis.dtx b/ekdosis.dtx
index ac4ae66..80b4a81 100644
--- a/ekdosis.dtx
+++ b/ekdosis.dtx
@@ -638,9 +638,9 @@ Running "make install" installs the files in the local TeX tree.
638 \luadirect{ekdosis.storeabspg( 638 \luadirect{ekdosis.storeabspg(
639 \luastring{\zref@extract{ekd:\theekd@lab}{abspage}})}% 639 \luastring{\zref@extract{ekd:\theekd@lab}{abspage}})}%
640 \ifekd@state\add@apparatus\fi% 640 \ifekd@state\add@apparatus\fi%
641 \luadirect{% 641 % \luadirect{%
642 ekdosis.storeabspg(\luastring{\zref@extract{ekd:\theekd@lab}{abspage}}, 642 % ekdosis.storeabspg(\luastring{\zref@extract{ekd:\theekd@lab}{abspage}},
643 "pg_ii")}% 643 % "pg_ii")}%
644 \luadirect{tex.sprint(ekdosis.removesp(\luastringN{#2}))}% 644 \luadirect{tex.sprint(ekdosis.removesp(\luastringN{#2}))}%
645 \ekd@isinappfalse} 645 \ekd@isinappfalse}
646\def\current@ref@arg#1#2{{%\textdir TLT% 646\def\current@ref@arg#1#2{{%\textdir TLT%
@@ -930,9 +930,9 @@ Running "make install" installs the files in the local TeX tree.
930 \luadirect{ekdosis.storeabspg( 930 \luadirect{ekdosis.storeabspg(
931 \luastring{\zref@extract{ekd:\theekd@lab}{abspage}})}% 931 \luastring{\zref@extract{ekd:\theekd@lab}{abspage}})}%
932 \ifekd@state\add@apparatus\fi% 932 \ifekd@state\add@apparatus\fi%
933 \luadirect{% 933 % \luadirect{%
934 ekdosis.storeabspg(\luastring{\zref@extract{ekd:\theekd@lab}{abspage}}, 934 % ekdosis.storeabspg(\luastring{\zref@extract{ekd:\theekd@lab}{abspage}},
935 "pg_ii")}% 935 % "pg_ii")}%
936 \ifekd@mapps% 936 \ifekd@mapps%
937 \ifnum% 937 \ifnum%
938 \luadirect{tex.sprint(ekdosis.get_bagunits(\luastringO{\ekdan@type}))} 938 \luadirect{tex.sprint(ekdosis.get_bagunits(\luastringO{\ekdan@type}))}
@@ -1053,9 +1053,9 @@ Running "make install" installs the files in the local TeX tree.
1053\NewDocumentCommand{\EkdosisStart}{}{% 1053\NewDocumentCommand{\EkdosisStart}{}{%
1054 \stepcounter{ekd@lab}% 1054 \stepcounter{ekd@lab}%
1055 \zlabel{ekd:\theekd@lab}% 1055 \zlabel{ekd:\theekd@lab}%
1056 \luadirect{% 1056 % \luadirect{%
1057 ekdosis.storeabspg(\luastring{\zref@extract{ekd:\theekd@lab}{abspage}}, 1057 % ekdosis.storeabspg(\luastring{\zref@extract{ekd:\theekd@lab}{abspage}},
1058 "pg_i")}% 1058 % "pg_i")}%
1059} 1059}
1060\NewDocumentCommand{\EkdosisOn}{}{% 1060\NewDocumentCommand{\EkdosisOn}{}{%
1061 \ekd@statetrue} 1061 \ekd@statetrue}
@@ -2213,8 +2213,8 @@ end
2213local curcol_curabspg = {} 2213local curcol_curabspg = {}
2214 2214
2215function ekdosis.testapparatus() 2215function ekdosis.testapparatus()
2216 if curcol ~= "x" 2216 -- if curcol ~= "x"
2217 then 2217 -- then
2218 if isfound(curcol_curabspg, curcol.."-"..cur_abs_pg) 2218 if isfound(curcol_curabspg, curcol.."-"..cur_abs_pg)
2219 then 2219 then
2220 return "\\boolfalse{do@app}" 2220 return "\\boolfalse{do@app}"
@@ -2225,24 +2225,24 @@ function ekdosis.testapparatus()
2225 end 2225 end
2226 return "\\booltrue{do@app}" 2226 return "\\booltrue{do@app}"
2227 end 2227 end
2228 else 2228 -- else
2229 if tonumber(pg_ii) < tonumber(pg_i) 2229 -- if tonumber(pg_ii) < tonumber(pg_i)
2230 or tonumber(pg_ii) < tonumber(cur_abs_pg) then 2230 -- or tonumber(pg_ii) < tonumber(cur_abs_pg) then
2231 pg_i = cur_abs_pg 2231 -- pg_i = cur_abs_pg
2232 if next(apparatuses) ~= nil then 2232 -- if next(apparatuses) ~= nil then
2233 reset_bagunits() 2233 -- reset_bagunits()
2234 end 2234 -- end
2235 return "\\booltrue{do@app}" 2235 -- return "\\booltrue{do@app}"
2236 elseif tonumber(pg_ii) == tonumber(pg_i) then 2236 -- elseif tonumber(pg_ii) == tonumber(pg_i) then
2237 return "\\boolfalse{do@app}" 2237 -- return "\\boolfalse{do@app}"
2238 elseif tonumber(pg_ii) > tonumber(pg_i) then 2238 -- elseif tonumber(pg_ii) > tonumber(pg_i) then
2239 pg_i = cur_abs_pg 2239 -- pg_i = cur_abs_pg
2240 if next(apparatuses) ~= nil then 2240 -- if next(apparatuses) ~= nil then
2241 reset_bagunits() 2241 -- reset_bagunits()
2242 end 2242 -- end
2243 return "\\booltrue{do@app}" 2243 -- return "\\booltrue{do@app}"
2244 end 2244 -- end
2245 end 2245 -- end
2246end 2246end
2247 2247
2248local lnlabs = {} 2248local lnlabs = {}