--- loncom/build/doc_template.pl	2002/05/02 02:09:34	1.7
+++ loncom/build/doc_template.pl	2002/07/27 22:44:37	1.8
@@ -1,6 +1,8 @@
-# perl script
+# doc_template.pl - A perl script for beautifying doc/build/*.html files
 
-# a quick and dirty xml reading and substitution
+# (Quick and dirty xml reading and substitution.)
+
+# Scott Harrison
 
 # --------------------------------------- slurp in information
 unless (scalar(@ARGV)==2) {
@@ -21,7 +23,7 @@ my $title=$1;
 $t=~s/\<TITLE \/\>/$title/g;
 $d=~/\$(.*?)\$/;
 my $e=$1;
-$e=~s/\S*\s\S*\s+\S*$/ updated by Scott Harrison/;
+$e=~s/\S*\s\S*\s+\S*$/ automatically updated/;
 my $cvsdate="<p align=\"left\"><font size=\"-2\"><i>CVS $e</i></font></p>";
 $t=~s/\<DATE \/\>/$cvsdate/g;
 $d=~/\<\!\-\- pdfahref (.*?) \-\-\>/;