From da5d4c5704057fa576e091370ebde484067a0a82 Mon Sep 17 00:00:00 2001
From: "A. Wilcox" <AWilcox@Wilcox-Tech.com>
Date: Wed, 5 Dec 2018 10:33:57 -0600
Subject: XSL: Add book title to HTML title

---
 master.xsl | 62 ++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
 1 file changed, 62 insertions(+)

diff --git a/master.xsl b/master.xsl
index 6c2297c..ae6209f 100644
--- a/master.xsl
+++ b/master.xsl
@@ -7,4 +7,66 @@
     <xsl:param name="admon.graphics.path"></xsl:param>
     <xsl:param name="chunk.section.depth" select="0"></xsl:param>
     <xsl:param name="html.stylesheet" select="'pretty.css'"/>
+    <xsl:variable name="adelie.book.title">
+        <xsl:call-template name="get.doc.title"/>
+    </xsl:variable>
+    <xsl:template name="head.content">
+        <xsl:param name="node" select="."/>
+        <xsl:param name="title">
+            <xsl:value-of select="$adelie.book.title"/>
+            <xsl:text> - </xsl:text>
+            <xsl:apply-templates select="$node" mode="object.title.markup.textonly"/>
+        </xsl:param>
+
+        <xsl:call-template name="user.head.title">
+            <xsl:with-param name="title" select="$title"/>
+            <xsl:with-param name="node" select="$node"/>
+        </xsl:call-template>
+
+        <xsl:if test="$html.base != ''">
+            <xsl:call-template name="head.content.base">
+                <xsl:with-param name="node" select="$node"/>
+            </xsl:call-template>
+        </xsl:if>
+
+        <!-- Insert links to CSS files or insert literal style elements -->
+        <xsl:call-template name="generate.css"/>
+
+        <xsl:if test="$html.stylesheet != ''">
+            <xsl:call-template name="output.html.stylesheets">
+                <xsl:with-param name="stylesheets" select="normalize-space($html.stylesheet)"/>
+            </xsl:call-template>
+        </xsl:if>
+
+        <xsl:if test="$html.script != ''">
+            <xsl:call-template name="output.html.scripts">
+                <xsl:with-param name="scripts" select="normalize-space($html.script)"/>
+            </xsl:call-template>
+        </xsl:if>
+
+        <xsl:if test="$link.mailto.url != ''">
+            <xsl:call-template name="head.content.link.made">
+                <xsl:with-param name="node" select="$node"/>
+            </xsl:call-template>
+        </xsl:if>
+
+        <xsl:call-template name="head.content.generator">
+            <xsl:with-param name="node" select="$node"/>
+        </xsl:call-template>
+
+        <xsl:if test="$generate.meta.abstract != 0">
+            <xsl:call-template name="head.content.abstract">
+                <xsl:with-param name="node" select="$node"/>
+            </xsl:call-template>
+        </xsl:if>
+
+        <xsl:if test="($draft.mode = 'yes' or
+                      ($draft.mode = 'maybe' and
+                      ancestor-or-self::*[@status][1]/@status = 'draft'))
+                      and $draft.watermark.image != ''">
+            <xsl:call-template name="head.content.style">
+                <xsl:with-param name="node" select="$node"/>
+            </xsl:call-template>
+        </xsl:if>
+    </xsl:template>
 </xsl:stylesheet>
-- 
cgit v1.2.3-60-g2f50