--- comics/fetch.pl.new 2013/03/01 14:38:47 1.12 +++ comics/fetch.pl.new 2013/03/12 13:09:34 1.13 @@ -9,7 +9,7 @@ use Getopt::Long; ## ## Some default values ## -my $ver = q/$Id: fetch.pl.new,v 1.12 2013/03/01 14:38:47 nick Exp $/; +my $ver = q/$Id: fetch.pl.new,v 1.13 2013/03/12 13:09:34 nick Exp $/; my $comicFile = "comics.conf"; my %comics = &readComicConfig ( $comicFile ); my %opts = &fetchOptions( ); @@ -225,6 +225,7 @@ sub writeTitle ($$) { + Daily Comics for $today