From ebe1911575aea114f2b4ace142f41c5049b8e705 Mon Sep 17 00:00:00 2001 From: Mark Wooding Date: Sun, 11 Jun 2023 11:06:47 +0100 Subject: [PATCH] mason/.perl-lib/TrivGal.pm: Remove spurious `$e'. Must have been a copy-and-paste from below. --- mason/.perl-lib/TrivGal.pm | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/mason/.perl-lib/TrivGal.pm b/mason/.perl-lib/TrivGal.pm index ea3b47a..8673b75 100644 --- a/mason/.perl-lib/TrivGal.pm +++ b/mason/.perl-lib/TrivGal.pm @@ -317,7 +317,7 @@ sub listdir ($) { if ($item && $comment) { $item->comment($comment); } close $f; } else { - my $st = stat "$path/$e"; + my $st = stat $path; unless ($st->mode&0004) { return ([], [], undef); } opendir $d, $path; -- 2.11.0