versetotei(): move first gsubs(str) as arg(str)

1 files changed, 8 insertions, 4 deletions

diff --git a/ekdosis.dtx b/ekdosis.dtx
index bd95000..bb02250 100644
--- a/ekdosis.dtx
+++ b/ekdosis.dtx
@@ -3673,7 +3673,7 @@ argument of the
   It is an ancient Mariner,\\
   And he stoppeth one of three.\\
   ‘By thy long grey beard and glittering eye,\\
-  Now wherefore stopp'st thou me?\\[\parskip]
+  Now wherefore stopp'st thou me?\\[2ex]
   %
   The Bridegroom's doors are opened wide,\\
   And I am next of kin;\\
@@ -3685,6 +3685,10 @@ argument of the
 %</example>
 % \fi
 %
+% As can be seen, stanzas are visually separated from one another by
+% an additional vertical space of \unit[2]{ex} (l.~5), while the
+% subsequent line is rendered inert.
+%
 % \begingroup
 % \setcolumnwidth{0.6\textwidth}
 % \setlength{\leftmargini}{0em}
@@ -9022,11 +9026,11 @@ end
 
 -- better use lpeg: look into this later
 local function versetotei(str)
-   str = string.gsub(str, "\\begin%s?%{patverse%}", "")
-   str = string.gsub(str, "\\end%s?%{patverse%}", "")
-   str = string.gsub(str, "\\indentpattern%s?%b{}", "")
    str = string.gsub(str, "\\begin%s?%{ekdverse%}(%b[])(.-)\\end%s?%{ekdverse%}", function(opt, arg)
                         arg = string.gsub(arg, "\\par%s?", "")
+                        arg = string.gsub(arg, "\\begin%s?%{patverse%}", "")
+                        arg = string.gsub(arg, "\\end%s?%{patverse%}", "")
+                        arg = string.gsub(arg, "\\indentpattern%s?%b{}", "")
                         opt = string.sub(opt, 2, -2)
                         teitype = get_attr_value(opt, "type")
                         if teitype ~= "" then teitype = " type=\""..teitype.."\"" else end