diff options
Diffstat (limited to 'makesite.pl')
| -rwxr-xr-x | makesite.pl | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/makesite.pl b/makesite.pl index 83bbce4..f78f387 100755 --- a/makesite.pl +++ b/makesite.pl @@ -14,7 +14,7 @@ sub page { unless(defined $pageType) { $pageType = "body"; # default page type } - open my $outHandle, ">>", "output/$pageFile"; + open my $outHandle, ">", "output/$pageFile"; # Write header and insert page title open my $inHandle, "<", "template/header.html"; while(<$inHandle>) { @@ -98,7 +98,7 @@ page "index.html", "blog.vdouillet.fr", $indexContent, "body", "index-body"; # Build RSS feed with article list in reverse (most recent first) print "Building RSS feed\n"; -open my $outHandle, ">>", "output/rss.xml"; +open my $outHandle, ">", "output/rss.xml"; # Write channel info and insert publication and build dates open my $inHandle, "<", "template/rss.xml"; my $pubDate = Time::Piece->strptime($articleList[$#articleList]{date}, "%m-%d-%Y"); # Last article date |