#! /bin/ksh
# from /home/eweb/botany/public_html/cp/list/dohype

PATH=$PATH:/local/bin:/usr/local/bin

export HM_SHOWHEADERS=0
export HM_DIRMODE=0755
export HM_FILEMODE=0644

for file in archive Archive_src/arch* 
do
    echo 
    case $file in
	archive )   year=`date +%Y` ;;
	* ) 	    year=`echo $file | sed -e 's/.*archive//' ` ;;
    esac
    dir=archive$year.hyp
    caption="Wind_Talk Mailing List Archives for $year"
    if [ -d $dir ] ; then
	if [ $file -nt $dir ] ; then
	    #nrm -r $dir
	    true
	else
	    echo "$dir is newer than $file; skipping"
	    continue
	fi
    fi
    echo "converting mail file $file, output to directory $dir"

    # Here we add a sed filter for a hypermail bug.  A too-long Message-Id line
    # gets the message subject into the filename field and a message like:
    #	hypermail: Couldn't chmod "RE: WS minivan for sale xx" to 666.
    sed '/^Message-Id:/s/\(............................................................................\).*/\1/' $file |
    #hypermail -pix \
    hypermail -pi \
	    -l "$caption" \
	    -d $dir \
	    -b "http:../../windsurf.html" 
	    #-a "http:/botany/public_html/cp/html/marchive.htm" \

     touch $dir
#    for x in author date index subject
#    do
#	cat ${file}d/$x.htm |
#	sed -e 's/About this archive/Back to CP Homepage/' > tmp.$$
#	mv tmp.$$ ${file}d/$x.htm
#    done
done 2>&1 |
    tee dohype.out |
    egrep -v '^ *$|converting|Loading|Writing|skipping'