postgres.git / summary / log / commit / refs
commit 20f22e6a67bcb90fbc4b40d7368ed309377c06b4
Author: Andrew Dunstan <andrew@dunslane.net>
Date: Wed Jun 26 11:01:47 2024 +0000
Remove redundant perl version checks
Commit 4c1532763a removed some redundant uses of 'use 5.008001;' in perl
scripts, including in plperl's plc_perlboot.pl. Because it made other
changes it wasn't backpatched. However, now this is causing a failure on
back branches when built with bleeding edge perl. Therefore, backpatch
just that part of it which removed those uses, from 15 all the way down
to 9.2, which is the earliest version currently built in the buildfarm.
per report from Alexander Lakhin
Discussion: https://postgr.es/m/4cc2ee93-e03c-8e13-61ed-412e7e6ff19d@gmail.com
src/pl/plperl/plc_perlboot.pl | 1 -
src/tools/pgindent/pgindent | 1 -
2 files changed, 2 deletions(-)
diff --git a/src/pl/plperl/plc_perlboot.pl b/src/pl/plperl/plc_perlboot.pl
index 028c4cea6d1..5e248dfd024 100644
--- a/src/pl/plperl/plc_perlboot.pl
+++ b/src/pl/plperl/plc_perlboot.pl
@@ -6,7 +6,6 @@
use strict;
use warnings;
-use 5.008001;
use vars qw(%_SHARED $_TD);
PostgreSQL::InServer::Util::bootstrap();
diff --git a/src/tools/pgindent/pgindent b/src/tools/pgindent/pgindent
index f8190b6c354..a3afb9db645 100755
--- a/src/tools/pgindent/pgindent
+++ b/src/tools/pgindent/pgindent
@@ -4,7 +4,6 @@
use strict;
use warnings;
-use 5.008001;
use Cwd qw(abs_path getcwd);
use File::Find;
[parent: 66e569f5022b]