diff options
-rw-r--r-- | ekdosis.dtx | 3 |
1 files changed, 2 insertions, 1 deletions
diff --git a/ekdosis.dtx b/ekdosis.dtx index 138b0a8..dc5d439 100644 --- a/ekdosis.dtx +++ b/ekdosis.dtx | |||
@@ -681,7 +681,7 @@ local aftercmd = lpeg.Cs(lpeg.S("*[{,.?;:'`\"") + dblbkslash) | |||
681 | local cmdargs = lpeg.Cs(spce^-1 * bsqbracketsii * bcbracesii * bsqbrackets^-1) | 681 | local cmdargs = lpeg.Cs(spce^-1 * bsqbracketsii * bcbracesii * bsqbrackets^-1) |
682 | local lemrdg = lpeg.Cs(lpeg.Cs("lem") + lpeg.Cs("rdg")) | 682 | local lemrdg = lpeg.Cs(lpeg.Cs("lem") + lpeg.Cs("rdg")) |
683 | local lnbrk = lpeg.Cs("\\\\") | 683 | local lnbrk = lpeg.Cs("\\\\") |
684 | local poemline = lpeg.Cs(lnbrk * lpeg.S(">")^-1 * bsqbrackets^-1) | 684 | local poemline = lpeg.Cs(lnbrk * bsqbrackets^-1) |
685 | local endpoem = lpeg.Cs(lnbrk * lpeg.S("*!") * bsqbrackets^-1) | 685 | local endpoem = lpeg.Cs(lnbrk * lpeg.S("*!") * bsqbrackets^-1) |
686 | 686 | ||
687 | -- Booleans | 687 | -- Booleans |
@@ -962,6 +962,7 @@ end | |||
962 | local function linestotei(str) | 962 | local function linestotei(str) |
963 | str = "\n<l>"..str | 963 | str = "\n<l>"..str |
964 | str = gsub(str, endpoem, "</l>\n") | 964 | str = gsub(str, endpoem, "</l>\n") |
965 | str = gsub(str, poemline * lpeg.P(">"), "\n<lb/>") | ||
965 | str = gsub(str, poemline, "</l>\n<l>") | 966 | str = gsub(str, poemline, "</l>\n<l>") |
966 | return str | 967 | return str |
967 | end | 968 | end |