X-Git-Url: https://git.ladys.computer/LesML/blobdiff_plain/51326631af07b5afd059dc21fc2d510b5583c71cba31815d5bc54aacb1a1e064..7fd550775c880ccf9e735c0ae4507eac57575ff9318066aff475db097b62280a:/xslt/lesml.xslt

diff --git a/xslt/lesml.xslt b/xslt/lesml.xslt
index 2100e06..61539dd 100644
--- a/xslt/lesml.xslt
+++ b/xslt/lesml.xslt
@@ -1,6 +1,6 @@
 <?xml version="1.0"?>
 <!--
-@(#)💄📝 Les·M·L	xslt/lesml.xslt	2026-03-31T01:29:32Z
+@(#)💄📝 Les·M·L	xslt/lesml.xslt	2026-03-31T01:31:16Z
 SPDX-FileCopyrightText: 2024, 2025, 2026 Lady <https://www.ladys.computer/about/#lady>
 SPDX-License-Identifier: MPL-2.0
 -->
@@ -290,6 +290,12 @@ If a block is nested within the wrapping `<div>´ of a paragraph, the
 								</attribute>
 							</element>
 						</when>
+						<when test="$sigils[1]='℣'">
+							<element name="dt" namespace="&xhtml;"/>
+						</when>
+						<when test="$sigils[1]='℟'">
+							<element name="dd" namespace="&xhtml;"/>
+						</when>
 						<when test="$sigils[1]='※'">
 							<element name="section" namespace="&xhtml;">
 								<attribute name="role">
@@ -625,7 +631,7 @@ This also requires processing any paragraph‐type indicators and
 					</otherwise>
 				</choose>
 			</variable>
-			<variable name="firstnosigil" select="substring(translate($nobullet, '•№※⯑∫☡⚠🛈💡»∎', ''), 1, 1)"/>
+			<variable name="firstnosigil" select="substring(translate($nobullet, '•№※⯑∫☡⚠🛈💡»∎℣℟', ''), 1, 1)"/>
 			<variable name="sigilling">
 				<choose>
 					<when test="$firstnosigil!=''">
@@ -1834,6 +1840,40 @@ These templates finalize the resulting tree.
 			</attribute>
 		</if>
 	</template>
+	<template match="html:dt|html:dd" mode="LesML:finalize-list">
+		<param name="used-footnotes" select="/.."/>
+		<variable name="current-level" select="number(&level-pi;)"/>
+		<variable name="notinlist" select="following-sibling::node()[not((self::html:dt or self::html:dd) and &level-pi;=$current-level)][1]"/>
+		<variable name="inlist" select=".|exslset:leading(following-sibling::node(), $notinlist)"/>
+		<variable name="lasts-in-pairing" select="$inlist[self::html:dd and not(exslset:intersection(following-sibling::node()[1]/self::html:dd, $inlist))]|$inlist[last()]"/>
+		<element name="dl" namespace="&xhtml;">
+			<for-each select="$lasts-in-pairing">
+				<variable name="prev-position" select="position()-1"/>
+				<variable name="prev-last" select="$lasts-in-pairing[$prev-position]"/>
+				<element name="div" namespace="&xhtml;">
+					<for-each select="exslset:leading(exslset:trailing($inlist, $prev-last), .)|.">
+						<if test="position()=1 and self::html:dd">
+							<element name="dt" namespace="&xhtml;"/>
+						</if>
+						<copy>
+							<apply-templates select="." mode="LesML:finalize-attributes"/>
+							<apply-templates select="node()" mode="LesML:finalize">
+								<with-param name="used-footnotes" select="$used-footnotes"/>
+							</apply-templates>
+						</copy>
+						<if test="position()=last() and self::html:dt">
+							<element name="dd" namespace="&xhtml;"/>
+						</if>
+					</for-each>
+				</element>
+			</for-each>
+		</element>
+		<if test="$notinlist/self::html:dt or $notinlist/self::html:dd">
+			<apply-templates select="$notinlist" mode="LesML:finalize-list">
+				<with-param name="used-footnotes" select="$used-footnotes"/>
+			</apply-templates>
+		</if>
+	</template>
 	<template match="html:li" mode="LesML:finalize-list">
 		<param name="used-footnotes" select="/.."/>
 		<variable name="current-class" select="string(@class)"/>
@@ -1943,6 +1983,14 @@ These templates finalize the resulting tree.
 			</apply-templates>
 		</element>
 	</template>
+	<template match="html:dt|html:dd" mode="LesML:finalize">
+		<param name="used-footnotes" select="/.."/>
+		<if test="not(preceding-sibling::node()) or preceding-sibling::node()[position()=1 and not(self::html:dt or self::html:dd)]">
+			<apply-templates select="." mode="LesML:finalize-list">
+				<with-param name="used-footnotes" select="$used-footnotes"/>
+			</apply-templates>
+		</if>
+	</template>
 	<template match="html:li" mode="LesML:finalize">
 		<param name="used-footnotes" select="/.."/>
 		<if test="not(preceding-sibling::node()) or preceding-sibling::node()[position()=1 and not(self::html:li)]">