diff options
| -rw-r--r-- | ekdosis.dtx | 5 |
1 files changed, 4 insertions, 1 deletions
diff --git a/ekdosis.dtx b/ekdosis.dtx index 5cae271..8a6cbb7 100644 --- a/ekdosis.dtx +++ b/ekdosis.dtx | |||
| @@ -912,6 +912,9 @@ function ekdosis.openteistream() | |||
| 912 | f:write('<?xml version="1.0" encoding="utf-8"?>', "\n") | 912 | f:write('<?xml version="1.0" encoding="utf-8"?>', "\n") |
| 913 | f:write("<TEI xmlns=\"http://www.tei-c.org/ns/1.0\">", "\n") | 913 | f:write("<TEI xmlns=\"http://www.tei-c.org/ns/1.0\">", "\n") |
| 914 | f:write("<teiHeader>", "\n") | 914 | f:write("<teiHeader>", "\n") |
| 915 | f:write("<encodingDesc>", "\n") | ||
| 916 | f:write('<variantEncoding method="parallel-segmentation" location="internal"/>', "\n") | ||
| 917 | f:write("</encodingDesc>", "\n") | ||
| 915 | f:write("<listWit>", "\n") | 918 | f:write("<listWit>", "\n") |
| 916 | for i = 1,#listWit do | 919 | for i = 1,#listWit do |
| 917 | f:write("<msDesc xml:id=\"", listWit[i].xmlid, "\">", "\n") | 920 | f:write("<msDesc xml:id=\"", listWit[i].xmlid, "\">", "\n") |
| @@ -999,7 +1002,7 @@ function ekdosis.closeteistream(opt) | |||
| 999 | os.remove(teifilename..".xml") | 1002 | os.remove(teifilename..".xml") |
| 1000 | os.rename(teifilename.."_tmp.xml", teifilename..".xml") | 1003 | os.rename(teifilename.."_tmp.xml", teifilename..".xml") |
| 1001 | if opt == "tidy" then | 1004 | if opt == "tidy" then |
| 1002 | os.execute("tidy -qmi -xml "..teifilename..".xml") | 1005 | os.execute("tidy -qmi -xml --output-xml yes "..teifilename..".xml") |
| 1003 | else | 1006 | else |
| 1004 | end | 1007 | end |
| 1005 | return true | 1008 | return true |