Mercurial > hg > paul
comparison bin/newSS @ 0:2aa53823fb21
new repo
| author | Henry S. Thompson <ht@inf.ed.ac.uk> |
|---|---|
| date | Sat, 06 Jun 2026 10:19:04 +0100 |
| parents | |
| children |
comparison
equal
deleted
inserted
replaced
| -1:000000000000 | 0:2aa53823fb21 |
|---|---|
| 1 #!/bin/sh | |
| 2 if [ "$1" = "-x" ] | |
| 3 then | |
| 4 op=" | |
| 5 <xsl:output method=\"xml\" doctype-public=\"-//W3C//DTD XHTML 1.0 Strict//EN\" | |
| 6 doctype-system=\"http://www.w3.org/TR/xhtml1/DTD/xhtml1-strict.dtd\"/>" | |
| 7 fi | |
| 8 d=/home/ht/lib/xml/ | |
| 9 p=$(pwd)/ | |
| 10 while : | |
| 11 do | |
| 12 dd=${d#/*} | |
| 13 pp=${p#/*} | |
| 14 x=${dd%%/*} | |
| 15 y=${pp%%/*} | |
| 16 if [ "$x" != "$y" ] | |
| 17 then | |
| 18 path=$(echo $pp | sed 's/[^/][^/]*/../g')$dd | |
| 19 break | |
| 20 fi | |
| 21 if [ "$x" == "" ] | |
| 22 then | |
| 23 path= | |
| 24 break | |
| 25 fi | |
| 26 d=${dd#*/} | |
| 27 p=${pp#*/} | |
| 28 done | |
| 29 cat << EOF | |
| 30 <?xml version='1.0'?> | |
| 31 <!DOCTYPE doc SYSTEM "${path}xsl.dtd" > | |
| 32 <xsl:stylesheet xmlns:xsl="http://www.w3.org/1999/XSL/Transform" version="1.0">$op | |
| 33 <xsl:template match="/"> | |
| 34 </xsl:template> | |
| 35 </xsl:stylesheet> | |
| 36 EOF |
