Fix pgbadger for modern perl

This commit is contained in:
2025-01-16 02:34:38 -05:00
parent 87f701596b
commit 790f90635d
3 changed files with 17 additions and 1 deletions

View File

@@ -0,0 +1,11 @@
--- A/pgbadger 2025-01-16 01:00:31.151014397 -0500
+++ B/pgbadger 2025-01-16 01:00:46.827014790 -0500
@@ -43,7 +43,7 @@
use POSIX qw(locale_h sys_wait_h _exit strftime);
setlocale(LC_NUMERIC, '');
setlocale(LC_ALL, 'C');
-use File::Spec qw/ tmpdir /;
+use File::Spec::Functions qw/ tmpdir /;
use File::Temp qw/ tempfile /;
use IO::Handle;
use IO::Pipe;