From 9205cc1666b2b08b13fc8653da40aded0f5669ec Mon Sep 17 00:00:00 2001
From: Winona Salesky <wsalesky@gmail.com>
Date: Sun, 28 May 2017 22:28:54 -0400
Subject: [PATCH] Added special handling for tei:orig. A patch.
 https://github.com/DCLP/dclpxsltbox/issues/272

---
 example-p5-xslt/tpl-apparatus.xsl | 46 +++++++++++++++++++++++++++++++
 1 file changed, 46 insertions(+)

diff --git a/example-p5-xslt/tpl-apparatus.xsl b/example-p5-xslt/tpl-apparatus.xsl
index 85383b4..50c92b1 100644
--- a/example-p5-xslt/tpl-apparatus.xsl
+++ b/example-p5-xslt/tpl-apparatus.xsl
@@ -871,6 +871,52 @@
             </xsl:for-each>
             <xsl:copy-of select="$buildup"/>
          </xsl:when>
+         <!-- Special handling for t:orig -->
+         <xsl:when test="$step[self::t:orig]">
+            <xsl:choose>
+               <xsl:when test="$step/text() and not($step/*)">
+                  <xsl:choose>
+                     <xsl:when test="$origin='hi'">
+                        <xsl:call-template name="trans-string">
+                           <xsl:with-param name="trans-text">
+                              <xsl:call-template name="string-after-space">
+                                 <xsl:with-param name="test-string" select="$step/text()"/>
+                              </xsl:call-template>
+                           </xsl:with-param>
+                        </xsl:call-template>
+                     </xsl:when>
+                     <xsl:otherwise>
+                        <xsl:call-template name="string-after-space">
+                           <xsl:with-param name="test-string" select="$step/text()"/>
+                        </xsl:call-template>
+                     </xsl:otherwise>
+                  </xsl:choose>
+                  <xsl:copy-of select="buildup"/>
+               </xsl:when>
+               <xsl:otherwise>
+                  <xsl:for-each select="$step/node()">
+                     <xsl:variable name="curstep-id" select="generate-id($step)"/>
+                     <xsl:choose>
+                        <xsl:when test="matches(., '[\s\n\r\t]')"/>
+                        <xsl:when test="following::text()[generate-id(ancestor::node()[1])=$curstep-id and matches(., '[\s\n\r\t]')]">
+                           <xsl:call-template name="recurse_down_back">
+                              <xsl:with-param name="step" select="following-sibling::node()[1]"/>
+                              <xsl:with-param name="buildup" select="buildup"/>
+                              <xsl:with-param name="origin" select="$origin"/>
+                           </xsl:call-template>
+                        </xsl:when>
+                        <xsl:otherwise>
+                           <xsl:call-template name="recurse_down_back">
+                              <xsl:with-param name="step" select="."/>
+                              <xsl:with-param name="buildup" select="buildup"/>
+                              <xsl:with-param name="origin" select="$origin"/>
+                           </xsl:call-template>
+                        </xsl:otherwise>
+                     </xsl:choose>
+                  </xsl:for-each>
+               </xsl:otherwise>
+            </xsl:choose>
+         </xsl:when>
          <xsl:otherwise>
             <xsl:element name="{$step/name()}" xmlns="http://www.tei-c.org/ns/1.0">
                <xsl:sequence select="$step/@*"/>