view bin/newdoc @ 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/bash
date=$(date +"%e %b %Y")
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
  d=${dd#*/}
  p=${pp#*/}
done
cat << EOF
<?xml version='1.0'?>
<?xml-stylesheet type="text/xsl" href="${path}doc.xsl" ?>
<!DOCTYPE doc SYSTEM "${path}doc.dtd" >
<doc>
 <head>
  <title></title>
  <author>Henry S. Thompson</author>
  <date>$date</date>
 </head>
 <body>
  <div>
   <title></title>
  </div>
 </body>
</doc>
EOF