#!/bin/sh -

list='dilbert userfriendly doonesbury foxtrot xkcd'
list="$list zippythecolorpinhead zippythepinhead mytomthedancingbug"
aa1='franknernest frazz cornered myrubes nonsequitur'		# bizarro
aa2='mytheothercoast myagnes buckets poochcafe arlonjanis'	# beetlebailey
plus='myspeedbump ripleys'
list="$list $aa1 $aa2 $plus"

defs="$HOME/libp/dailystrips"
args='--quiet --lite'
#rgs='--verbose --lite'
#est="$HOME/work/me"; mkdir $dest 2> /dev/null
dest="mailto:${USER-$LOGNAME}"
send=/usr/lib/sendmail
prfx=_

# comics - generate daily personal comic strip web page
# Steve Kinzler, kinzler@cs.indiana.edu, Jul 02/Jun 04/Oct 05
# http://www.cs.indiana.edu/~kinzler/home.html#web

#se Date::Parse;

case "$1" in
-h)	echo "usage: $0 [ date ]" 1>&2; exit 1;;
?*)	date=;		tsec=`getdate "$*"`;;
*)	date="`date`";	tsec=`getdate "$date"`;;
esac
set x `ctime $tsec`
dd="$4"; mm="$3"; yy=`echo $* | sed 's/.* //'`

title="dailystrips for $dd $mm $yy"
(echo "<title>$title</title>"
 case "$date" in
 ?*)	dailystrips --defs "$defs" $args		      $list;;
 *)	dailystrips --defs "$defs" $args --date "$dd $mm $yy" $list;;
 esac) |

case "$dest" in
mailto:*)	dest="`echo "$dest" | sed 's/mailto://'`"
		(cat <<EOF
To: $dest
Subject: $title
MIME-Version: 1.0
Content-Type: text/html; charset=us-ascii
Content-Transfer-Encoding: 7bit
EOF
		echo ''; cat) | $send -t -oi;;
*)		cat > "$dest/$prfx"comics_$dd$mm$yy.html;;
esac