teiexport: process TeX grouping inside braces

1 files changed, 23 insertions, 0 deletions

diff --git a/ekdosis.dtx b/ekdosis.dtx
index a1c3bb0..fc39141 100644
--- a/ekdosis.dtx
+++ b/ekdosis.dtx
@@ -12051,6 +12051,29 @@ local function cmdtotei(str)
                         body = cmdtotei(body)
                         return string.format("<%s>%s</%s>", cmd, body, cmd)
    end)
+   str = string.gsub(str, "\\([%{%}])", function(brace)
+                        if brace == "{"
+                        then
+                           brace = "ekd@ob"
+                        else
+                           brace = "ekd@cb"
+                        end
+                        return brace
+   end)
+   str = gsub(str, bcbraces, function(inbraces)
+                 inbraces = string.sub(inbraces, 2, -2)
+                 inbraces = cmdtotei(inbraces)
+                 return inbraces
+   end)
+   str = string.gsub(str, "ekd@([oc])b", function(oc)
+                        if oc == "o"
+                        then
+                           oc = "{"
+                        else
+                           oc = "}"
+                        end
+                        return oc
+   end)
    str = string.gsub(str, "(%s)(%>)", "%2")
    return str
 end