From: Mischa POSLAWSKY <perl@shiar.org>
Date: Sun, 6 Dec 2020 06:11:06 +0000 (+0100)
Subject: mail: ignore unreadable files
X-Git-Tag: v5.0~27
X-Git-Url: http://git.shiar.net/minimedit.git/commitdiff_plain/fbeede6b78751daa3758b33181cd0e3c070713d1

mail: ignore unreadable files

Incorrect installation should be obvious without fatal errors.
---

diff --git a/mail/index.php b/mail/index.php
index 37b1edc..ce133c5 100644
--- a/mail/index.php
+++ b/mail/index.php
@@ -59,11 +59,15 @@ array_splice($rows, 0, -50);
 ob_start();
 print '<ul>';
 foreach (array_reverse($rows) as $filename) {
-	list ($headerdata) = explode("\n\n", file_get_contents($filename));
-	$head = parsemailhead($headerdata);
+	if (!is_readable($filename)) {
+		continue;
+	}
 
 	printf('<li><a href="%s">', "/{$Page->handler}/".basename($filename));
 
+	list ($headerdata) = explode("\n\n", file_get_contents($filename));
+	$head = parsemailhead($headerdata);
+
 	print $head['Subject'];
 	printf(' <small class="date">%s</small>',
 		showdate(explode('-', $head['date']->format('Y-m-d')))