Mercurial > hg > paul
view bin/newSS @ 4:1641fdbc1809 default tip
sic
| author | Henry S. Thompson <ht@inf.ed.ac.uk> |
|---|---|
| date | Tue, 18 Aug 2026 15:39:39 +0100 |
| parents | 2aa53823fb21 |
| children |
line wrap: on
line source
#!/bin/sh if [ "$1" = "-x" ] then op=" <xsl:output method=\"xml\" doctype-public=\"-//W3C//DTD XHTML 1.0 Strict//EN\" doctype-system=\"http://www.w3.org/TR/xhtml1/DTD/xhtml1-strict.dtd\"/>" fi d=/home/ht/lib/xml/ p=$(pwd)/ while : do dd=${d#/*} pp=${p#/*} x=${dd%%/*} y=${pp%%/*} if [ "$x" != "$y" ] then path=$(echo $pp | sed 's/[^/][^/]*/../g')$dd break fi if [ "$x" == "" ] then path= break fi d=${dd#*/} p=${pp#*/} done cat << EOF <?xml version='1.0'?> <!DOCTYPE doc SYSTEM "${path}xsl.dtd" > <xsl:stylesheet xmlns:xsl="http://www.w3.org/1999/XSL/Transform" version="1.0">$op <xsl:template match="/"> </xsl:template> </xsl:stylesheet> EOF
