comics/fetch.pl.new - diff

Return to fetch.pl.new CVS log

Up to [Local Repository] / comics

version 1.8, 2013/02/05 14:31:57	version 1.9, 2013/02/25 13:48:21
Line 116 sub readComicConfig ($$) {	Line 116 sub readComicConfig ($$) {
#######################################################################	#######################################################################
sub writeComic ($$) {	sub writeComic ($$) {
my ( $comics, $comic, $date ) = @_;	my ( $comics, $comic, $date ) = @_;
my $indexFile = $indexDir . "/index-" . $date->{'year2'} . $date->{'mon2'} .	my $indexFile = $indexDir . "/index-" . $days[$date->{'dow'}] .
	"-" . $date->{'year2'} . $date->{'mon2'} .
$date->{'day2'} . ".html";	$date->{'day2'} . ".html";
my $content = <<EOF;	my $content = <<EOF;