From 4e7a5130271fcc579f89d3f7ae6b69e73d37c32a Mon Sep 17 00:00:00 2001
From: Andrew Dunstan <andrew@dunslane.net>
Date: Tue, 5 Feb 2019 09:59:46 -0500
Subject: [PATCH] Fix searchpath for modern Perl for genbki.pl

This was fixed for MSVC tools by commit 1df92eeafefac4, but per
buildfarm member bowerbird genbki.pl needs the same treatment.

Backpatch to all live branches.
---
 src/backend/catalog/genbki.pl | 4 ++++
 1 file changed, 4 insertions(+)

diff --git a/src/backend/catalog/genbki.pl b/src/backend/catalog/genbki.pl
index 9be51d28b03..2b4a1de0a99 100644
--- a/src/backend/catalog/genbki.pl
+++ b/src/backend/catalog/genbki.pl
@@ -14,6 +14,10 @@
 #
 #----------------------------------------------------------------------
 
+use File::Basename;
+use File::Spec;
+BEGIN  { use lib File::Spec->rel2abs(dirname(__FILE__)); }
+
 use Catalog;
 
 use strict;
-- 
2.39.5