From: Johannes Schindelin <johannes.schindelin@gmx.de>
Date: Mon, 29 Jul 2019 20:08:04 +0000 (-0700)
Subject: contrib/buildsystems: ignore irrelevant files in Generators/
X-Git-Tag: v2.23.0-rc1~2^2~17
X-Git-Url: https://git.lorimer.id.au/gitweb.git/diff_plain/e88919bfe285965bf99e3302a90187ba6f117be6?hp=865406bc5426d5196935e37a3a5fde9c843c3e96

contrib/buildsystems: ignore irrelevant files in Generators/

The Generators/ directory can contain spurious files such as editors'
backup files. Even worse, there could be .swp files which are not even
valid Perl scripts.

Let's just ignore anything but .pm files in said directory.

Signed-off-by: Johannes Schindelin <johannes.schindelin@gmx.de>
Signed-off-by: Junio C Hamano <gitster@pobox.com>
---

diff --git a/contrib/buildsystems/Generators.pm b/contrib/buildsystems/Generators.pm
index 408ef714b8..aa4cbaa2ad 100644
--- a/contrib/buildsystems/Generators.pm
+++ b/contrib/buildsystems/Generators.pm
@@ -17,7 +17,7 @@ BEGIN
     $me = dirname($me);
     if (opendir(D,"$me/Generators")) {
         foreach my $gen (readdir(D)) {
-            next if ($gen  =~ /^\.\.?$/);
+            next unless ($gen  =~ /\.pm$/);
             require "${me}/Generators/$gen";
             $gen =~ s,\.pm,,;
             push(@AVAILABLE, $gen);