From 0491c65e748a50e9577dff915f2ea4f74b779eb0 Mon Sep 17 00:00:00 2001
From: Robert Alessi <alessi@robertalessi.net>
Date: Fri, 27 Mar 2020 16:12:13 +0100
Subject: no need to store pg_i and pg_ii anymore

---
 ekdosis.dtx | 58 +++++++++++++++++++++++++++++-----------------------------
 1 file changed, 29 insertions(+), 29 deletions(-)

(limited to 'ekdosis.dtx')

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.
   \luadirect{ekdosis.storeabspg(
     \luastring{\zref@extract{ekd:\theekd@lab}{abspage}})}%
   \ifekd@state\add@apparatus\fi%
-  \luadirect{%
-    ekdosis.storeabspg(\luastring{\zref@extract{ekd:\theekd@lab}{abspage}},
-    "pg_ii")}%
+  % \luadirect{%
+  %   ekdosis.storeabspg(\luastring{\zref@extract{ekd:\theekd@lab}{abspage}},
+  %   "pg_ii")}%
   \luadirect{tex.sprint(ekdosis.removesp(\luastringN{#2}))}%
   \ekd@isinappfalse}
 \def\current@ref@arg#1#2{{%\textdir TLT%
@@ -930,9 +930,9 @@ Running "make install" installs the files in the local TeX tree.
   \luadirect{ekdosis.storeabspg(
     \luastring{\zref@extract{ekd:\theekd@lab}{abspage}})}%
   \ifekd@state\add@apparatus\fi%
-  \luadirect{%
-    ekdosis.storeabspg(\luastring{\zref@extract{ekd:\theekd@lab}{abspage}},
-    "pg_ii")}%
+  % \luadirect{%
+  %   ekdosis.storeabspg(\luastring{\zref@extract{ekd:\theekd@lab}{abspage}},
+  %   "pg_ii")}%
   \ifekd@mapps%
     \ifnum%
       \luadirect{tex.sprint(ekdosis.get_bagunits(\luastringO{\ekdan@type}))}
@@ -1053,9 +1053,9 @@ Running "make install" installs the files in the local TeX tree.
 \NewDocumentCommand{\EkdosisStart}{}{%
   \stepcounter{ekd@lab}%
   \zlabel{ekd:\theekd@lab}%
-  \luadirect{%
-    ekdosis.storeabspg(\luastring{\zref@extract{ekd:\theekd@lab}{abspage}},
-    "pg_i")}%
+  % \luadirect{%
+  %   ekdosis.storeabspg(\luastring{\zref@extract{ekd:\theekd@lab}{abspage}},
+  %   "pg_i")}%
 }
 \NewDocumentCommand{\EkdosisOn}{}{%
   \ekd@statetrue}
@@ -2213,8 +2213,8 @@ end
 local curcol_curabspg = {}
 
 function ekdosis.testapparatus()
-   if curcol ~= "x"
-   then
+   -- if curcol ~= "x"
+   -- then
       if isfound(curcol_curabspg, curcol.."-"..cur_abs_pg)
       then
 	 return "\\boolfalse{do@app}"
@@ -2225,24 +2225,24 @@ function ekdosis.testapparatus()
 	 end
 	 return "\\booltrue{do@app}"
       end
-   else
-      if tonumber(pg_ii) < tonumber(pg_i)
-      or tonumber(pg_ii) < tonumber(cur_abs_pg) then
-	 pg_i = cur_abs_pg
-	 if next(apparatuses) ~= nil then
-	    reset_bagunits()
-	 end
-	 return "\\booltrue{do@app}"
-      elseif tonumber(pg_ii) == tonumber(pg_i) then
-	 return "\\boolfalse{do@app}"
-      elseif tonumber(pg_ii) > tonumber(pg_i) then
-	 pg_i = cur_abs_pg
-	 if next(apparatuses) ~= nil then
-	    reset_bagunits()
-	 end
-	 return "\\booltrue{do@app}"
-      end
-   end
+   -- else
+   --    if tonumber(pg_ii) < tonumber(pg_i)
+   --    or tonumber(pg_ii) < tonumber(cur_abs_pg) then
+   -- 	 pg_i = cur_abs_pg
+   -- 	 if next(apparatuses) ~= nil then
+   -- 	    reset_bagunits()
+   -- 	 end
+   -- 	 return "\\booltrue{do@app}"
+   --    elseif tonumber(pg_ii) == tonumber(pg_i) then
+   -- 	 return "\\boolfalse{do@app}"
+   --    elseif tonumber(pg_ii) > tonumber(pg_i) then
+   -- 	 pg_i = cur_abs_pg
+   -- 	 if next(apparatuses) ~= nil then
+   -- 	    reset_bagunits()
+   -- 	 end
+   -- 	 return "\\booltrue{do@app}"
+   --    end
+   -- end
 end
 
 local lnlabs = {}
-- 
cgit v1.2.3

