comics/fetch.pl.new - diff

Return to fetch.pl.new CVS log

Up to [Local Repository] / comics

Diff for /comics/fetch.pl.new between versions 1.27 and 1.28

version 1.27, 2019/04/15 12:50:23	version 1.28, 2020/06/10 21:14:31
Line 2	Line 2

###############################################################################	###############################################################################
# $Log$	# $Log$
	# Revision 1.28 2020/06/10 21:14:31 nick
	# Updated for w3 validation.
	#
# Revision 1.27 2019/04/15 12:50:23 nick	# Revision 1.27 2019/04/15 12:50:23 nick
# The script was unable to handle html '&' and convert it, so I added that. I probably should see if there's a library or something that handles all those automagically but I just tossed a regex in there for now that does the trick.	# The script was unable to handle html '&' and convert it, so I added that. I probably should see if there's a library or something that handles all those automagically but I just tossed a regex in there for now that does the trick.
#	#
Line 247 sub writeComic ($$) {	Line 250 sub writeComic ($$) {
my $indexFile = $indexDir . "/index-" . $date->{'year2'} .	my $indexFile = $indexDir . "/index-" . $date->{'year2'} .
$date->{'mon2'} . $date->{'day2'} . "-" .	$date->{'mon2'} . $date->{'day2'} . "-" .
$sd . ".html";	$sd . ".html";
	$comics->{$comic}{'fullName'} =~ s/&/&/g;
my $content = <<EOF;	my $content = <<EOF;

<!-- ******* Begin $comic ($comics->{$comic}{'fullName'}) ***** -->	<!-- ******* Begin $comic ($comics->{$comic}{'fullName'}) ***** -->
Line 309 sub writeFooter {	Line 313 sub writeFooter {
print INDEX <<EOF;	print INDEX <<EOF;
</table>	</table>
<center>	<center>
<font size="2">	Generated on: <font size="2" color="green">$sysDate</font><br/>
Generated on: <font color="green">$sysDate</font><br/>	Version: <font size="2" color="green">$ver</font><br />
Version: <font color="green">$ver</font><br />	Config Version: <font size="2" color="green">$comicConfigVer</font><br />
Config Version: <font color="green">$comicConfigVer</font><br />	CVS: <a href="http://demandred.dyndns.org:3000/cgi-bin/cvsweb/comics/">http://demandred.dyndns.org/cgi-bin/cvsweb/comics/</a>
CVS: <a href="http://demandred.dyndns.org/cgi-bin/cvsweb/comics/">http://demandred.dyndns.org/cgi-bin/cvsweb/comics/</a>	<br />
<p>
<a href="http://validator.w3.org/check?uri=referer"><img	<a href="http://validator.w3.org/check?uri=referer"><img
src="http://www.w3.org/Icons/valid-xhtml10-blue" alt="Valid XHTML 1.0 Transitional" height="31" width="88" border="0" /></a>	src="http://www.w3.org/Icons/valid-xhtml10-blue" alt="Valid XHTML 1.0 Transitional" height="31" width="88" border="0" /></a>
</p>
</center>	</center>

</body>	</body>
Line 354 sub writeTitle ($$) {	Line 356 sub writeTitle ($$) {
<html xmlns="http://www.w3.org/1999/xhtml">	<html xmlns="http://www.w3.org/1999/xhtml">
<head>	<head>
<meta http-equiv="Content-Type" content="text/html;charset=utf-8" />	<meta http-equiv="Content-Type" content="text/html;charset=utf-8" />
<link href="/daily/comics/comics.css" type="text/css" rel="stylesheet" media="screen">	<link href="/daily/comics/comics.css" type="text/css" rel="stylesheet" media="screen" />
<link rel="shortcut icon" href="./favicon.ico">	<link rel="shortcut icon" href="./favicon.ico" />
<title>Daily Comics for $today</title>	<title>Daily Comics for $today</title>
</head>	</head>
<body bgcolor="#FFFFFF">	<body bgcolor="#FFFFFF">
<table align="center" cellpadding="5" cellspacing="0">
<tr><td>
<table cellpadding="0" cellspacing="0" border="0">	<table cellpadding="0" cellspacing="0" border="0">
<tr><td align="Left"><img src="images/daily_comics_heading01.png"></td></tr>	<tr><td align="left"><img src="images/daily_comics_heading01.png" alt="Comic Page Heading" /></td></tr>
<tr><td align="left">$today_long</td></tr>	<tr><td align="left">$today_long</td></tr>
<tr><td> </td></tr>	<tr><td> </td></tr>
</td</tr>

EOF	EOF
close (INDEX);	close (INDEX);
}	}

FreeBSD-CVSweb <freebsd-cvsweb@FreeBSD.org>

Removed from v.1.27
changed lines
	Added in v.1.28