aboutsummaryrefslogtreecommitdiff
diff options
context:
space:
mode:
-rw-r--r--ekdosis.dtx5
1 files changed, 3 insertions, 2 deletions
diff --git a/ekdosis.dtx b/ekdosis.dtx
index ce49ed7..640b91d 100644
--- a/ekdosis.dtx
+++ b/ekdosis.dtx
@@ -1733,12 +1733,13 @@ function ekdosis.closeteistream(opt)
1733 if xmlbibresource ~= nil then 1733 if xmlbibresource ~= nil then
1734 bibf = assert(io.open(xmlbibresource, "r")) 1734 bibf = assert(io.open(xmlbibresource, "r"))
1735 t = bibf:read("*a") 1735 t = bibf:read("*a")
1736 t = string.gsub(t, " corresp%=%b\"\"", "") 1736 t = string.gsub(t, "%s+corresp%=%b\"\"", "")
1737 t = string.gsub(t, "\n\n", "\n")
1737 f:write("<back>", "\n") 1738 f:write("<back>", "\n")
1738 f:write("<listBibl>", "\n") 1739 f:write("<listBibl>", "\n")
1739 for i in string.gmatch(t, "<biblStruct.->.-</biblStruct>") 1740 for i in string.gmatch(t, "<biblStruct.->.-</biblStruct>")
1740 do 1741 do
1741 f:write("\n", i, "\n") 1742 f:write(i, "\n")
1742 end 1743 end
1743 f:write("</listBibl>", "\n") 1744 f:write("</listBibl>", "\n")
1744 f:write("</back>", "\n") 1745 f:write("</back>", "\n")