From 51b025933d442823b076e36f4dbe756d25b1a159 Mon Sep 17 00:00:00 2001
From: Andrew Dunstan <andrew@dunslane.net>
Date: Thu, 7 Feb 2019 11:14:29 -0500
Subject: [PATCH] Fix perl searchpath for gen_keywordlist.pl

as found by running src/tools/perlcheck/pgperlsyncheck
---
 src/tools/gen_keywordlist.pl | 4 ++++
 1 file changed, 4 insertions(+)

diff --git a/src/tools/gen_keywordlist.pl b/src/tools/gen_keywordlist.pl
index 78ac1cd1c1a..1c1f1df6ad1 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 = '';