From 5f1454b63f4087c75656d103d78214e859354c7f Mon Sep 17 00:00:00 2001
From: Robert Alessi <alessi@robertalessi.net>
Date: Sat, 3 Oct 2020 21:29:37 +0200
Subject: limit the list of attributes accepted in <rdgGrp> to 'type'

---
 ekdosis.dtx | 16 ++++++++--------
 1 file changed, 8 insertions(+), 8 deletions(-)

(limited to 'ekdosis.dtx')

diff --git a/ekdosis.dtx b/ekdosis.dtx
index 642ca56..20fbdb3 100644
--- a/ekdosis.dtx
+++ b/ekdosis.dtx
@@ -7902,12 +7902,12 @@ local function rdgGrp_totei(str)
 	      function(bkslash, cmd, opt, arg)
 		 opt = string.sub(opt, 2, -2)
 		 arg = string.sub(arg, 2, -2)
-		 teiwit = get_attr_value(opt, "wit")
-		 if teiwit ~= "" then teiwit = " wit=\""..ekdosis.getsiglum(teiwit, "tei").."\"" else end
-		 teisource = get_attr_value(opt, "source")
-		 if teisource ~= "" then teisource = " source=\""..ekdosis.getsiglum(teisource, "tei").."\"" else end
-		 teiresp = get_attr_value(opt, "resp")
-		 if teiresp ~= "" then teiresp = " resp=\""..ekdosis.getsiglum(teiresp, "tei").."\"" else end
+		 -- teiwit = get_attr_value(opt, "wit")
+		 -- if teiwit ~= "" then teiwit = " wit=\""..ekdosis.getsiglum(teiwit, "tei").."\"" else end
+		 -- teisource = get_attr_value(opt, "source")
+		 -- if teisource ~= "" then teisource = " source=\""..ekdosis.getsiglum(teisource, "tei").."\"" else end
+		 -- teiresp = get_attr_value(opt, "resp")
+		 -- if teiresp ~= "" then teiresp = " resp=\""..ekdosis.getsiglum(teiresp, "tei").."\"" else end
 		 teitype = get_attr_value(opt, "type")
 		 if teitype ~= "" then teitype = " type=\""..teitype.."\"" else end
 		 if opt == ""
@@ -7915,8 +7915,8 @@ local function rdgGrp_totei(str)
 		    return rdgGrp_totei(string.format("<%s>%s</%s>",
 						       cmd, arg, cmd))
 		 else
-		    return rdgGrp_totei(string.format("<%s%s%s%s%s>%s</%s>",
-						       cmd, teiwit, teisource, teiresp, teitype, arg, cmd))
+		    return rdgGrp_totei(string.format("<%s%s>%s</%s>",
+						       cmd, teitype, arg, cmd))
 		 end
    end)
    return str
-- 
cgit v1.2.3

