From ba59e8d53b056133db5322dce1510a0044971c1f Mon Sep 17 00:00:00 2001
From: Mischa POSLAWSKY <perl@shiar.org>
Date: Fri, 2 Feb 2024 21:10:09 +0100
Subject: [PATCH] source: read highlighted cache as unicode

Fix double encoding of utf8.
---
 source.plp | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/source.plp b/source.plp
index 863ef35..cf22e34 100644
--- a/source.plp
+++ b/source.plp
@@ -83,7 +83,7 @@ else {
 	my $cachefile = "source/$source.html";
 	if (-e $cachefile and (stat $cachefile)->[9] >= (stat $path)->[9]) {
 		say '<pre>';
-		print ReadFile($cachefile);
+		print decode_utf8(ReadFile($cachefile));
 		say '</pre>';
 		exit;
 	}
-- 
2.30.0