From: Andrew Dunstan <andrew@dunslane.net>
Date: Thu, 7 Feb 2019 16:14:29 +0000 (-0500)
Subject: Fix perl searchpath for gen_keywordlist.pl
X-Git-Url: http://git.postgresql.org/gitweb/constraints.php?a=commitdiff_plain;h=51b025933d442823b076e36f4dbe756d25b1a159;p=users%2Frhaas%2Fpostgres.git

Fix perl searchpath for gen_keywordlist.pl

as found by running src/tools/perlcheck/pgperlsyncheck
---

diff --git a/src/tools/gen_keywordlist.pl b/src/tools/gen_keywordlist.pl
index 78ac1cd1c1..1c1f1df6ad 100644
--- a/src/tools/gen_keywordlist.pl
+++ b/src/tools/gen_keywordlist.pl
@@ -31,6 +31,10 @@
 use strict;
 use warnings;
 use Getopt::Long;
+
+use FindBin;
+use lib $FindBin::RealBin;
+
 use PerfectHash;
 
 my $output_path = '';