From 0644796fdf1e5ac2fc884d5557e0579b0a241354 Mon Sep 17 00:00:00 2001
From: Vincent Douillet <vincent@vdouillet.fr>
Date: Fri, 11 Nov 2022 14:20:36 +0100
Subject: small corrections to articles and generator script

---
 makesite.pl | 4 ++--
 1 file changed, 2 insertions(+), 2 deletions(-)

(limited to 'makesite.pl')

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
-- 
cgit v1.2.3