@pretextbook/pretext-html 0.1.0

package/assets/xsl/pretext-view-source.xsl

@@ -0,0 +1,157 @@
+<?xml version='1.0'?> <!-- As XML file -->
+
+<!--********************************************************************
+Copyright 2019 Robert A. Beezer
+
+This file is part of PreTeXt.
+
+PreTeXt is free software: you can redistribute it and/or modify
+it under the terms of the GNU General Public License as published by
+the Free Software Foundation, either version 2 or version 3 of the
+License (at your option).
+
+PreTeXt is distributed in the hope that it will be useful,
+but WITHOUT ANY WARRANTY; without even the implied warranty of
+MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+GNU General Public License for more details.
+
+You should have received a copy of the GNU General Public License
+along with PreTeXt.  If not, see <http://www.gnu.org/licenses/>.
+*********************************************************************-->
+
+<!-- http://pimpmyxslt.com/articles/entity-tricks-part2/ -->
+<!DOCTYPE xsl:stylesheet [
+    <!ENTITY % entities SYSTEM "entities.ent">
+    %entities;
+]>
+
+<!-- Identify as a stylesheet -->
+<!-- We choose to not include a default namespace       -->
+<!-- (in particular  http://www.w3.org/1999/xhtml),     -->
+<!-- even if this complicates adding namespaces onto    -->
+<!-- derivatives, such as HTML destined for EPUB output -->
+<!-- xmlns="http://www.w3.org/1999/xhtml"               -->
+<xsl:stylesheet
+    xmlns:xsl="http://www.w3.org/1999/XSL/Transform" version="1.0"
+    xmlns:xml="http://www.w3.org/XML/1998/namespace"
+    xmlns:exsl="http://exslt.org/common"
+    extension-element-prefixes="exsl"
+>
+
+<!--                       IMPORTANT                         -->
+<!-- The "sanitize-text" template can be called on sizeable  -->
+<!-- chunks of text, in a recursive manner, and then looks   -->
+<!-- like runaway recursion.  "xsltproc" has a "-maxdepth"   -->
+<!-- argument.  For the sample article, we increased it from -->
+<!-- 3000 to 6000 to prevent a spurious error.               -->
+
+<!-- We assume the source is in great shape, typically having been -->
+<!-- created by a pretty-printing tool.  So we keep all the        -->
+<!-- whitespace as being of interest to human reader.   This is    -->
+<!-- the beauty of a separate stylesheet here:                     -->
+<!--   (a) we can override the strip-space declarations            -->
+<!--       of the main HTML stylesheet                             -->
+<!--   (b) the election of the addition of source annotations      -->
+<!--       is made by simply using a different stylesheet          -->
+<xsl:preserve-space elements="*"/>
+<!-- But whitespace in the root element gets regurgitated          -->
+<!-- outside/before/above any file writing and ends up on the      -->
+<!-- terminal.  So we kill it with no loss.                        -->
+<xsl:strip-space elements="pretext"/>
+
+<!-- Below, we use a purpose-built attribute to match elements which    -->
+<!-- have been through the pre-proccessor with their (nearly-)original  -->
+<!-- progenitors.  So we need this id here, late in the game, but we    -->
+<!-- don't want authors wondering if they should be authoring it in     -->
+<!-- their source.  So at the last minute, while creating text versions -->
+<!-- of source material, we kill it.  Any similar leakage could be      -->
+<!-- handled the same way.                                              -->
+<xsl:template match="@original-id" mode="xml-to-string"/>
+
+
+<!-- N.B.: the -assembly stylesheet first construct a "version" which   -->
+<!-- is the resolution of version support and customizations.  Then     -->
+<!-- "original-id" are added in the next pass.  These are solely for    -->
+<!-- the purpose of "going back" to this second pass to identify pieces -->
+<!-- of a document before the assembly process perturbs them.  So the   -->
+<!-- key tree this next template acts on is in the variable             -->
+<!-- $original-labeled.  Just above we explain how these id's get       -->
+<!-- scrubbed before presenting source to the reader.                   -->
+
+<!-- The template to place into the HTML stylesheet, which is        -->
+<!-- overriding a do-nothing stub in the HTML stylesheet.  This is   -->
+<!-- a no-op unless the $b-view-source has been set to true()        -->
+<!-- electively.  Not too much of a performance hit as bailing out   -->
+<!-- is quick, and use is limited to divisions and blocks (roughly). -->
+<xsl:template match="*" mode="view-source-widget">
+    <!-- Footnotes are silly to annotate, and are also automatically -->
+    <!-- generated for URLs and hence have no original source, so we -->
+    <!-- kill them here.  Careful experiments suggest these are the  -->
+    <!-- only elements without source.                               -->
+    <xsl:variable name="b-banned" select="boolean(self::fn)"/>
+    <xsl:if test="$b-view-source and not($b-banned)">
+        <!-- Part 1: Serialize the source -->
+        <!-- Save off the id of the element being annotated -->
+        <xsl:variable name="the-element-id" select="@original-id"/>
+        <!-- Locate the element with the same id, but in a very early -->
+        <!-- pass of the assembly stylesheet, so with as little (no?) -->
+        <!-- extraneous manufactured markup as possible.              -->
+        <xsl:variable name="original-element" select="$original-labeled//*[@original-id = $the-element-id]"/>
+        <!-- Just for convenience, capture highly sanitized text      -->
+        <!-- version of the XML source within a variable.             -->
+        <!--                                                          -->
+        <!--   (1) Grab the node *just prior* to the element.         -->
+        <!--   (2) This ends with a newline and then some             -->
+        <!--       indentation, we grab this indentation.             -->
+        <!--   (3) Serialize the element, a photocopy machine         -->
+        <!--       which converts XML nodes into text (originally     -->
+        <!--       built to put HTML into JSON for Jupyter).          -->
+        <!--   (4) Run (2)+(3) through "sanitize-text" mainly to pull -->
+        <!--       the whole stanza left, since it may have a lot of  -->
+        <!--       common indentation (which is why we caught         -->
+        <!--       the preceding indentation).                        -->
+        <!--   (5) Run that through "sanitize-text" to deindent       -->
+        <!-- NB: the $original-element is used *twice* below, in      -->
+        <!-- order to have the right conteaxt for the manipulations   -->
+        <xsl:variable name="serialized-html">
+            <xsl:variable name="serialized-html-raw">
+                <xsl:variable name="lead-in">
+                    <xsl:apply-templates select="$original-element/preceding-sibling::node()[1]" mode="xml-to-string">
+                        <xsl:with-param name="depth" select="1"/>
+                    </xsl:apply-templates>
+                </xsl:variable>
+                <xsl:call-template name="substring-after-last">
+                    <xsl:with-param name="input" select="$lead-in" />
+                    <xsl:with-param name="substr" select="'&#xa;'" />
+                </xsl:call-template>
+                <xsl:apply-templates select="$original-element" mode="xml-to-string">
+                    <xsl:with-param name="depth" select="1"/>
+                </xsl:apply-templates>
+            </xsl:variable>
+            <xsl:call-template name="sanitize-text">
+                <xsl:with-param name="text">
+                    <xsl:value-of select="$serialized-html-raw"/>
+                </xsl:with-param>
+            </xsl:call-template>
+        </xsl:variable>
+
+        <!-- Part 2: drop the source into a details on the page -->
+        <details class="source-view">
+          <summary class="source-view__link" data-reveal-label="Open" data-close-label="Close">
+              <!-- TODO: internationalize me? -->
+              <xsl:text>View Source for </xsl:text><xsl:value-of select="name()"/>
+          </summary>
+          <!-- -->
+          <article class="view-source-view__content" >
+              <pre>
+                  <code class="language-xml">
+                      <xsl:value-of select="$serialized-html"/>
+                  </code>
+              </pre>
+          </article>
+      </details>
+
+    </xsl:if>
+</xsl:template>
+
+</xsl:stylesheet>

package/assets/xsl/pretext-ww-problem-sets.xsl

@@ -0,0 +1,391 @@
+<?xml version="1.0" encoding="UTF-8" ?>
+
+<!-- ********************************************************************* -->
+<!-- Copyright 2015-18                                                     -->
+<!-- Robert A. Beezer, Michael Gage, Geoff Goehle, Alex Jordan             -->
+<!--                                                                       -->
+<!-- This file is part of PreTeXt.                                         -->
+<!--                                                                       -->
+<!-- PreTeXt is free software: you can redistribute it and/or modify       -->
+<!-- it under the terms of the GNU General Public License as published by  -->
+<!-- the Free Software Foundation, either version 2 or version 3 of the    -->
+<!-- License (at your option).                                             -->
+<!--                                                                       -->
+<!-- PreTeXt is distributed in the hope that it will be useful,            -->
+<!-- but WITHOUT ANY WARRANTY; without even the implied warranty of        -->
+<!-- MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the         -->
+<!-- GNU General Public License for more details.                          -->
+<!--                                                                       -->
+<!-- You should have received a copy of the GNU General Public License     -->
+<!-- along with PreTeXt.  If not, see <http://www.gnu.org/licenses/>.      -->
+<!-- ********************************************************************* -->
+
+<!-- http://pimpmyxslt.com/articles/entity-tricks-part2/ -->
+<!DOCTYPE xsl:stylesheet [
+    <!ENTITY % entities SYSTEM "entities.ent">
+    %entities;
+]>
+
+<xsl:stylesheet xmlns:xsl="http://www.w3.org/1999/XSL/Transform" version="1.0"
+    xmlns:xml="http://www.w3.org/XML/1998/namespace"
+    xmlns:exsl="http://exslt.org/common"
+    extension-element-prefixes="exsl"
+>
+
+<!-- Apply this style sheet to to produce a folder tree of PG problem files -->
+<!-- with set defintion and set header files. Compress into a .tgz and      -->
+<!-- upload into a WeBWorK course (perhaps in the templates/local folder);  -->
+<!-- or into a server's libraries folder and set up site-wide access.       -->
+
+<!-- Standard conversion groundwork -->
+<xsl:import href="./publisher-variables.xsl"/>
+<xsl:import href="./pretext-assembly.xsl"/>
+<xsl:import href="./pretext-common.xsl"/>
+<xsl:import href="./extract-pg.xsl"/>
+
+<!-- Intend output to be a PG/PGML problem or a "def" file -->
+<xsl:output method="text" />
+
+<!-- ######### -->
+<!-- Variables -->
+<!-- ######### -->
+
+<!-- This variable controls representations of interactive exercises    -->
+<!-- built in  pretext-assembly.xsl.  This is the one place we override -->
+<!-- this variable to the value 'pg-problems' as a signal to only mine  -->
+<!-- PG representations from the multiple representations available.    -->
+<xsl:variable name="exercise-style" select="'pg-problems'"/>
+
+<!-- We default to one massive def file -->
+<xsl:variable name="chunk-level">
+    <xsl:choose>
+        <xsl:when test="$chunk-level-entered != ''">
+            <xsl:value-of select="$chunk-level-entered" />
+        </xsl:when>
+        <xsl:otherwise>
+            <xsl:text>0</xsl:text>
+        </xsl:otherwise>
+    </xsl:choose>
+</xsl:variable>
+
+<!-- ############## -->
+<!-- Entry template -->
+<!-- ############## -->
+
+<!-- First, create the problem files in directories                           -->
+<!-- Organized in directories as in the document tree, cut off at chunk level -->
+<!-- Then chunk the document to write reasonable problem definition files     -->
+<xsl:template match="/">
+    <xsl:apply-templates select="$original" mode="generic-warnings"/>
+    <xsl:apply-templates select="$document-root//webwork[statement|task|text()]" mode="write-file"/>
+    <xsl:apply-templates select="$document-root" mode="chunking"/>
+</xsl:template>
+
+<!-- ################## -->
+<!-- Filename Utilities -->
+<!-- ################## -->
+
+<xsl:template name="project-folder">
+    <xsl:apply-templates select="$document-root" mode="numbered-title-filesafe" />
+</xsl:template>
+
+<!-- Directory path, recursively climb structural nodes,  -->
+<!-- record names as pass up through chunk-level barrier  -->
+<!-- Includes root document node (book, article, etc)     -->
+<xsl:template match="*" mode="directory-path">
+    <xsl:variable name="structural">
+        <xsl:apply-templates select="." mode="is-structural"/>
+    </xsl:variable>
+    <xsl:variable name="current-level">
+        <xsl:choose>
+            <xsl:when test="$structural = 'true'">
+                <xsl:apply-templates select="." mode="level" />
+            </xsl:when>
+            <xsl:otherwise>
+                <xsl:text>undefined</xsl:text>
+            </xsl:otherwise>
+        </xsl:choose>
+    </xsl:variable>
+    <xsl:choose>
+        <xsl:when test="self::mathbook|self::pretext" /> <!-- done -->
+        <xsl:when test="$structural='false'">  <!-- skip up -->
+            <xsl:apply-templates select="parent::*" mode="directory-path" />
+        </xsl:when>
+        <!-- structural is true now, compare levels -->
+        <xsl:when test="$current-level > $chunk-level">  <!-- also skip up -->
+            <xsl:apply-templates select="parent::*" mode="directory-path" />
+        </xsl:when>
+        <xsl:otherwise> <!-- append current node name -->
+            <xsl:apply-templates select="parent::*" mode="directory-path" />
+            <xsl:apply-templates select="." mode="numbered-title-filesafe" />
+            <xsl:text>/</xsl:text>
+        </xsl:otherwise>
+    </xsl:choose>
+</xsl:template>
+
+<!-- Append a filename to the directory path              -->
+<xsl:template match="webwork[statement|task|text()]" mode="relative-filename">
+    <xsl:apply-templates select="." mode="directory-path" />
+    <xsl:if test="parent::*[&PROJECT-FILTER;]">
+        <xsl:apply-templates select="parent::*" mode="type-name"/>
+        <xsl:text>-</xsl:text>
+    </xsl:if>
+    <xsl:apply-templates select="parent::*" mode="numbered-title-filesafe" />
+    <xsl:text>.pg</xsl:text>
+</xsl:template>
+<xsl:template match="webwork[statement|task|text()]" mode="filename">
+    <xsl:apply-templates select="." mode="relative-filename"/>
+</xsl:template>
+
+<xsl:template match="webwork[@source|@local]" mode="filename">
+    <xsl:apply-templates select="." mode="relative-filename"/>
+</xsl:template>
+
+<!-- For problems from the OPL, just report the @source -->
+<xsl:template match="webwork[@source]" mode="relative-filename">
+    <xsl:value-of select="@source"/>
+</xsl:template>
+
+<!-- For local, just report @local but inside external directory, and all   -->
+<!-- inside the project folder, with the expectation that a host WW course  -->
+<!-- will copy the external folder to the project folder in templates/      -->
+<xsl:template match="webwork[@local]" mode="relative-filename">
+    <xsl:call-template name="project-folder"/>
+    <xsl:value-of select="concat('/',$external-directory,@local)"/>
+</xsl:template>
+
+<!-- For copied problems move to the problem that was copied -->
+<xsl:template match="webwork[@copied-from]" mode="relative-filename">
+    <xsl:variable name="copied-from" select="@copied-from"/>
+    <xsl:apply-templates select="$document-root//webwork[@xml:id=$copied-from]" mode="relative-filename"/>
+</xsl:template>
+<xsl:template match="webwork[@copied-from]" mode="filename">
+    <xsl:variable name="copied-from" select="@copied-from"/>
+    <xsl:apply-templates select="$document-root//webwork[@xml:id=$copied-from]" mode="filename"/>
+</xsl:template>
+
+<!-- ################## -->
+<!-- Problem Extraction -->
+<!-- ################## -->
+
+<!-- Extract an authored problem into its own file, flush left -->
+<xsl:template match="webwork[statement|task|text()]" mode="write-file">
+    <xsl:variable name="filename">
+        <xsl:apply-templates select="." mode="filename" />
+    </xsl:variable>
+    <exsl:document href="{$filename}" method="text">
+        <xsl:choose>
+            <xsl:when test="statement|task">
+                <xsl:call-template name="sanitize-text">
+                    <xsl:with-param name="text">
+                        <xsl:call-template name="consolidate-empty-lines">
+                            <xsl:with-param name="text">
+                                <xsl:apply-templates select=".">
+                                    <xsl:with-param name="b-hint" select="true()" />
+                                    <xsl:with-param name="b-solution" select="true()" />
+                                    <xsl:with-param name="b-human-readable" select="true()" />
+                                </xsl:apply-templates>
+                            </xsl:with-param>
+                        </xsl:call-template>
+                    </xsl:with-param>
+                </xsl:call-template>
+            </xsl:when>
+            <xsl:otherwise>
+                <xsl:value-of select="."/>
+            </xsl:otherwise>
+        </xsl:choose>
+    </exsl:document>
+</xsl:template>
+
+<!-- We don't write a new file for a copied webwork exercise -->
+<xsl:template match="webwork[@copied-from]" mode="write-file"/>
+
+<!-- ################## -->
+<!-- Chunking Def Files-->
+<!-- ################## -->
+
+<!-- A complete file for a structural subdivision -->
+<xsl:template match="&STRUCTURAL;" mode="chunk">
+    <!-- Separate webwork within any exercises into their own set. -->
+    <xsl:apply-templates select="." mode="file-wrap">
+        <xsl:with-param name="content">
+            <xsl:apply-templates select=".//webwork[statement|task|text()|@source|@local|@copy and not(ancestor::exercises)]" mode="def-info-v2" />
+        </xsl:with-param>
+    </xsl:apply-templates>
+    <xsl:apply-templates select="." mode="file-wrap">
+        <xsl:with-param name="exercises" select="true()" />
+        <xsl:with-param name="content">
+            <xsl:apply-templates select=".//webwork[statement|task|text()|@source|@local|@copy and ancestor::exercises]" mode="def-info-v2" />
+        </xsl:with-param>
+    </xsl:apply-templates>
+</xsl:template>
+
+<!-- A summary file for a structural subdivision                -->
+<!-- Any webwork not in a subdivision (say, in an introduction) -->
+<!-- The // is OK here (rather than descendant-or-self) since   -->
+<!-- there will at least be an intervening "exercise" wrapper   -->
+<xsl:template match="&STRUCTURAL;" mode="intermediate">
+    <xsl:apply-templates select="." mode="file-wrap">
+        <xsl:with-param name="content">
+            <xsl:apply-templates select="*[not(&STRUCTURAL-FILTER;)]//webwork[statement|task|text()|@source|@local|@copy]" mode="def-info-v2" />
+        </xsl:with-param>
+    </xsl:apply-templates>
+</xsl:template>
+
+<!-- ##################### -->
+<!-- Def File Construction -->
+<!-- ##################### -->
+
+<!-- A *.def file for a structural subdivision -->
+<xsl:template match="&STRUCTURAL;" mode="file-wrap">
+    <xsl:param name="content" />
+    <xsl:param name="exercises" select="false()" />
+    <!-- no problems, no def infos, then no file -->
+    <xsl:if test="not($content = '')">
+        <!-- filenames -->
+        <xsl:variable name="def-filename">
+            <xsl:call-template name="project-folder" />
+            <xsl:text>/def/</xsl:text>
+            <!-- mandatory filename initial string -->
+            <xsl:text>set</xsl:text>
+            <xsl:apply-templates select="." mode="numbered-title-filesafe" />
+            <xsl:if test="$exercises">
+                <xsl:text>_Exercises</xsl:text>
+            </xsl:if>
+            <xsl:text>.def</xsl:text>
+        </xsl:variable>
+        <xsl:variable name="relative-header-filename">
+            <xsl:call-template name="project-folder" />
+            <xsl:text>/header/</xsl:text>
+            <xsl:apply-templates select="." mode="numbered-title-filesafe" />
+            <xsl:if test="$exercises">
+                <xsl:text>_Exercises</xsl:text>
+            </xsl:if>
+            <xsl:text>.pg</xsl:text>
+        </xsl:variable>
+        <xsl:variable name="header-filename">
+            <xsl:value-of select="$relative-header-filename"/>
+        </xsl:variable>
+        <!-- set-definition file -->
+        <exsl:document href="{$def-filename}" method="text">
+            <!-- Fixed, obviously fictional placeholder dates so the file -->
+            <!-- is stable across regenerations.  Earlier this used       -->
+            <!-- "date:date-time()" + a six-month "date:add", which made  -->
+            <!-- every regeneration churn the dates with no semantic      -->
+            <!-- change.  Authors using this output will edit the dates   -->
+            <!-- to fit their course schedule anyway.                     -->
+            <xsl:text>openDate          = 01/01/2027 at 12:00am&#xa;</xsl:text>
+            <xsl:text>dueDate           = 12/31/2027 at 10:00pm&#xa;</xsl:text>
+            <xsl:text>answerDate        = 12/31/2027 at 10:00pm&#xa;</xsl:text>
+            <xsl:text>paperHeaderFile   = </xsl:text>
+            <xsl:value-of select="$relative-header-filename" />
+            <xsl:text>&#xa;</xsl:text>
+            <xsl:text>screenHeaderFile  = </xsl:text>
+            <xsl:value-of select="$relative-header-filename" />
+            <xsl:text>&#xa;</xsl:text>
+            <xsl:text>description       = </xsl:text>
+            <xsl:apply-templates select="." mode="title-simple" />
+            <xsl:text>&#xa;</xsl:text>
+            <!-- Version 2 problem list lead-in -->
+            <xsl:text>problemListV2&#xa;</xsl:text>
+            <xsl:copy-of select="$content" />
+        </exsl:document>
+        <!-- set-header file -->
+        <!-- a bit of a hack to write a second file here -->
+        <!-- but we avoid the entire $content used above -->
+        <exsl:document href="{$header-filename}" method="text">
+            <xsl:apply-templates select="." mode="header-content" />
+        </exsl:document>
+    </xsl:if>
+</xsl:template>
+
+<!-- Version 2 problem info -->
+<!-- Each problem gets its own line in the problem set   -->
+<!-- definition file. Be careful to create no content if -->
+<!-- there are no problems in a subdivision as we employ -->
+<!-- non-emptieness up the wrapping chain to ensure      -->
+<!--  no trivial problem definition files are created.   -->
+<!-- http://webwork.maa.org/wiki/Set_Definition_Files#Version_2 -->
+<xsl:template match="webwork" mode="def-info-v2">
+    <xsl:text>problem_start&#xa;</xsl:text>
+    <xsl:text>source_file = </xsl:text> <!-- PG file -->
+    <xsl:apply-templates select="." mode="relative-filename" />
+    <xsl:text>&#xa;</xsl:text>
+    <!--Much of the following commented out until we decide we should include them.   -->
+    <!--WeBWorK provides good default values, customizable by sysadmin or instructor. -->
+    <!--<xsl:text>value = 1&#xa;</xsl:text>--> <!-- default problem weight -->
+    <!--<xsl:text>max_attempts = -1&#xa;</xsl:text>--> <!-- default max attempts is unlimited -->
+    <!--<xsl:text>showMeAnother = -1&#xa;</xsl:text>--> <!-- default SMA is off -->
+    <xsl:text>problem_id = </xsl:text>
+    <xsl:apply-templates select="ancestor::exercise" mode="serial-number" />
+    <xsl:text>&#xa;</xsl:text>
+    <!--<xsl:text>counts_parent_grade = 0&#xa;</xsl:text>--> <!-- for JIT sets only -->
+    <!--<xsl:text>att_to_open_children = 0&#xa;</xsl:text>--> <!-- for JIT sets only -->
+    <xsl:text>problem_end&#xa;</xsl:text>
+</xsl:template>
+
+<!-- Header file content -->
+<!-- Gives some information about where in the PTX project the set came from -->
+<!-- Some info changes with WW variables, such as due date -->
+<xsl:template match="*" mode="header-content">
+    <!-- Inneficient: indented text in variable, then strip indentation -->
+    <!-- Alternative: wrap each line in "text" with linefeeds           -->
+    <xsl:variable name="header-text">
+        <xsl:text>
+        # Header file for problem set </xsl:text><xsl:apply-templates select="." mode="numbered-title-filesafe" />
+        <xsl:text>
+        # This header file can be used for both the screen and hardcopy output
+
+        DOCUMENT();
+
+        loadMacros(
+            "PG.pl",
+            "PGbasicmacros.pl",
+            "PGML.pl",
+            "PGcourse.pl",
+        );
+
+        TEXT($BEGIN_ONE_COLUMN);
+
+        $texTopLine = "\noindent {\large \bf $studentName}\hfill{\large \bf {".protect_underbar($courseName)."}}";
+        if (defined($sectionName) and ($sectionName ne '')) {$texTopLine .= "  {\large \bf { Section: ".protect_underbar($sectionName)." } }"}; 
+        $texTopLine .= "\par";
+
+        ####################################################
+        #
+        # MODES provides for distinct output for TeX and HTML
+        #
+        ####################################################
+
+        TEXT(MODES(
+            TeX =&gt;"$texTopLine",
+            HTML=&gt;"",
+        ));
+
+        TEXT(MODES(
+            TeX =>"\noindent{\large \sc {Assignment ".protect_underbar($setNumber)." due $formatedDueDate}}\par".
+                  "\noindent \bigskip ",
+            HTML=>"&lt;span style='font-variant: small-caps; font-size:large;'&gt;WeBWorK Assignment ".protect_underbar($setNumber)." is due: $formattedDueDate. &lt;/span&gt;$PAR",
+        ));
+        </xsl:text><xsl:choose><xsl:when test="$document-root//frontmatter/colophon/website"><xsl:text>
+        TEXT(MODES(
+            TeX =>"\noindent This assignment contains exercises from </xsl:text><xsl:apply-templates select="." mode="type-name" /><xsl:text> </xsl:text><xsl:apply-templates select="." mode="number" /><xsl:text> of </xsl:text><xsl:apply-templates select="$document-root"  mode="title-simple" /><xsl:text>.",
+            HTML=>"This assignment contains exercises from ".htmlLink(qq!</xsl:text><xsl:apply-templates select="$document-root//frontmatter/colophon/website/url/@href" /><xsl:text>/</xsl:text><xsl:apply-templates select="." mode="visible-id" /><xsl:text>.html!,"</xsl:text><xsl:apply-templates select="." mode="type-name" /><xsl:text> </xsl:text><xsl:apply-templates select="." mode="number" /><xsl:text>")." of </xsl:text><xsl:apply-templates select="$document-root"  mode="title-simple" /><xsl:text>."
+        ));
+        </xsl:text></xsl:when><xsl:otherwise><xsl:text>
+        TEXT("This assignment contains exercises from </xsl:text><xsl:apply-templates select="." mode="type-name" /><xsl:text> </xsl:text><xsl:apply-templates select="." mode="number" /><xsl:text> of </xsl:text><xsl:apply-templates select="$document-root"  mode="title-simple" /><xsl:text>.");
+        </xsl:text></xsl:otherwise></xsl:choose>
+
+        <xsl:text>
+        TEXT($END_ONE_COLUMN);
+
+        ENDDOCUMENT();
+        </xsl:text>
+    </xsl:variable>
+    <!-- lazy, strips indentation, etc -->
+    <xsl:call-template name="sanitize-text">
+        <xsl:with-param name="text" select="$header-text" />
+    </xsl:call-template>
+</xsl:template>
+
+</xsl:stylesheet>