
#!/bin/sh

#
#	.mkspotlite.sh	Generate a readable list of recommended
#			works.
#
#
#	$Id: .mkspotlite.sh,v 1.2 2003/11/10 18:17:34 jcl Exp $
#
#	$Author: jcl $
#
#	$Log: .mkspotlite.sh,v $
#	Revision 1.2  2003/11/10 18:17:34  jcl
#	added RCS tags and link to JCL's main index
#
#
#
#


SPOTLITE=SpotLights.html
NEWFILE=${SPOTLITE}+


cat			>$NEWFILE			<<SPOTLITE
<HTML>
<HEAD>
<TITLE>Stories I Like</TITLE>
</HEAD>
<BODY TEXT="#000000" BGCOLOR="#FAF0E6" LINK="#7F0000" VLINK="#007F00" ALINK="#00007F">
<H1 ALIGN=CENTER>
	<B> Stories (and authors!) I Like </B>			<BR>
	- Jack C Lipton
</H1>
<P>
	<A HREF="index.html"> Main Page </A>			<BR>
<P>
Please note that these are in no specific order.
<P>

<UL>
SPOTLITE

cat		.spotlites				\
   |	while	read	LIMELITE
	    do
		AUTHOR="`echo $LIMELITE | awk '-F|' '{print $1}'`"
		STORY="`echo $LIMELITE | awk '-F|' '{print $2}'`"
		STORY_URL="`echo $LIMELITE | awk '-F|' '{print $3}'`"
		AUTHOR_URL="`echo $LIMELITE | awk '-F|' '{print $4}'`"
		COMMENT="`echo $LIMELITE | awk '-F|' '{print $5}'`"

		cat		>>$NEWFILE		<<SPOTLITE

    <LI>    <A HREF="$STORY_URL"> $STORY </A>
         by <A HREF="$AUTHOR_URL"> $AUTHOR </A>          <BR>

            $COMMENT

            <BR> <BR>

SPOTLITE

	    done



cat			>>$NEWFILE			<<SPOTLITE
</BODY>
</HTML>
SPOTLITE

cutover	$SPOTLITE

exit	0