mirror of
				https://github.com/postgres/postgres.git
				synced 2025-11-03 09:13:20 +03:00 
			
		
		
		
	Make all Perl warnings fatal, catch-up
Apply c538592959 to new Perl files that had missed the note.
			
			
This commit is contained in:
		@@ -1,7 +1,7 @@
 | 
				
			|||||||
# Copyright (c) 2021-2024, PostgreSQL Global Development Group
 | 
					# Copyright (c) 2021-2024, PostgreSQL Global Development Group
 | 
				
			||||||
 | 
					
 | 
				
			||||||
use strict;
 | 
					use strict;
 | 
				
			||||||
use warnings;
 | 
					use warnings FATAL => 'all';
 | 
				
			||||||
use PostgreSQL::Test::Utils;
 | 
					use PostgreSQL::Test::Utils;
 | 
				
			||||||
use Test::More;
 | 
					use Test::More;
 | 
				
			||||||
 | 
					
 | 
				
			||||||
 
 | 
				
			|||||||
@@ -1,7 +1,7 @@
 | 
				
			|||||||
# Copyright (c) 2021-2024, PostgreSQL Global Development Group
 | 
					# Copyright (c) 2021-2024, PostgreSQL Global Development Group
 | 
				
			||||||
 | 
					
 | 
				
			||||||
use strict;
 | 
					use strict;
 | 
				
			||||||
use warnings;
 | 
					use warnings FATAL => 'all';
 | 
				
			||||||
use File::Compare;
 | 
					use File::Compare;
 | 
				
			||||||
use PostgreSQL::Test::Cluster;
 | 
					use PostgreSQL::Test::Cluster;
 | 
				
			||||||
use PostgreSQL::Test::Utils;
 | 
					use PostgreSQL::Test::Utils;
 | 
				
			||||||
 
 | 
				
			|||||||
@@ -9,7 +9,7 @@
 | 
				
			|||||||
# Copyright (c) 2000-2024, PostgreSQL Global Development Group
 | 
					# Copyright (c) 2000-2024, PostgreSQL Global Development Group
 | 
				
			||||||
 | 
					
 | 
				
			||||||
use strict;
 | 
					use strict;
 | 
				
			||||||
use warnings;
 | 
					use warnings FATAL => 'all';
 | 
				
			||||||
use Getopt::Long;
 | 
					use Getopt::Long;
 | 
				
			||||||
 | 
					
 | 
				
			||||||
use FindBin;
 | 
					use FindBin;
 | 
				
			||||||
 
 | 
				
			|||||||
@@ -5,7 +5,7 @@
 | 
				
			|||||||
 | 
					
 | 
				
			||||||
 | 
					
 | 
				
			||||||
use strict;
 | 
					use strict;
 | 
				
			||||||
use warnings;
 | 
					use warnings FATAL => 'all';
 | 
				
			||||||
 | 
					
 | 
				
			||||||
use PostgreSQL::Test::Utils;
 | 
					use PostgreSQL::Test::Utils;
 | 
				
			||||||
use Test::More;
 | 
					use Test::More;
 | 
				
			||||||
 
 | 
				
			|||||||
@@ -5,7 +5,7 @@
 | 
				
			|||||||
# for a variety of small inputs.
 | 
					# for a variety of small inputs.
 | 
				
			||||||
 | 
					
 | 
				
			||||||
use strict;
 | 
					use strict;
 | 
				
			||||||
use warnings;
 | 
					use warnings FATAL => 'all';
 | 
				
			||||||
 | 
					
 | 
				
			||||||
use PostgreSQL::Test::Utils;
 | 
					use PostgreSQL::Test::Utils;
 | 
				
			||||||
use Test::More;
 | 
					use Test::More;
 | 
				
			||||||
 
 | 
				
			|||||||
@@ -5,7 +5,7 @@
 | 
				
			|||||||
# output with the expected output.
 | 
					# output with the expected output.
 | 
				
			||||||
 | 
					
 | 
				
			||||||
use strict;
 | 
					use strict;
 | 
				
			||||||
use warnings;
 | 
					use warnings FATAL => 'all';
 | 
				
			||||||
 | 
					
 | 
				
			||||||
use PostgreSQL::Test::Utils;
 | 
					use PostgreSQL::Test::Utils;
 | 
				
			||||||
use Test::More;
 | 
					use Test::More;
 | 
				
			||||||
 
 | 
				
			|||||||
@@ -7,7 +7,7 @@
 | 
				
			|||||||
# of iterations instead of just one.
 | 
					# of iterations instead of just one.
 | 
				
			||||||
 | 
					
 | 
				
			||||||
use strict;
 | 
					use strict;
 | 
				
			||||||
use warnings;
 | 
					use warnings FATAL => 'all';
 | 
				
			||||||
 | 
					
 | 
				
			||||||
use PostgreSQL::Test::Utils;
 | 
					use PostgreSQL::Test::Utils;
 | 
				
			||||||
use Test::More;
 | 
					use Test::More;
 | 
				
			||||||
 
 | 
				
			|||||||
@@ -2,7 +2,7 @@
 | 
				
			|||||||
# Copyright (c) 2024, PostgreSQL Global Development Group
 | 
					# Copyright (c) 2024, PostgreSQL Global Development Group
 | 
				
			||||||
 | 
					
 | 
				
			||||||
use strict;
 | 
					use strict;
 | 
				
			||||||
use warnings;
 | 
					use warnings FATAL => 'all';
 | 
				
			||||||
use locale;
 | 
					use locale;
 | 
				
			||||||
 | 
					
 | 
				
			||||||
use PostgreSQL::Test::Cluster;
 | 
					use PostgreSQL::Test::Cluster;
 | 
				
			||||||
 
 | 
				
			|||||||
@@ -2,7 +2,7 @@
 | 
				
			|||||||
# Copyright (c) 2024, PostgreSQL Global Development Group
 | 
					# Copyright (c) 2024, PostgreSQL Global Development Group
 | 
				
			||||||
 | 
					
 | 
				
			||||||
use strict;
 | 
					use strict;
 | 
				
			||||||
use warnings;
 | 
					use warnings FATAL => 'all';
 | 
				
			||||||
use PostgreSQL::Test::Cluster;
 | 
					use PostgreSQL::Test::Cluster;
 | 
				
			||||||
use PostgreSQL::Test::Utils;
 | 
					use PostgreSQL::Test::Utils;
 | 
				
			||||||
use Test::More;
 | 
					use Test::More;
 | 
				
			||||||
 
 | 
				
			|||||||
@@ -2,7 +2,7 @@
 | 
				
			|||||||
# Copyright (c) 2024, PostgreSQL Global Development Group
 | 
					# Copyright (c) 2024, PostgreSQL Global Development Group
 | 
				
			||||||
 | 
					
 | 
				
			||||||
use strict;
 | 
					use strict;
 | 
				
			||||||
use warnings;
 | 
					use warnings FATAL => 'all';
 | 
				
			||||||
use PostgreSQL::Test::Cluster;
 | 
					use PostgreSQL::Test::Cluster;
 | 
				
			||||||
use PostgreSQL::Test::Utils;
 | 
					use PostgreSQL::Test::Utils;
 | 
				
			||||||
use Time::HiRes qw(usleep);
 | 
					use Time::HiRes qw(usleep);
 | 
				
			||||||
 
 | 
				
			|||||||
@@ -5,7 +5,7 @@
 | 
				
			|||||||
# to create backups.
 | 
					# to create backups.
 | 
				
			||||||
 | 
					
 | 
				
			||||||
use strict;
 | 
					use strict;
 | 
				
			||||||
use warnings;
 | 
					use warnings FATAL => 'all';
 | 
				
			||||||
 | 
					
 | 
				
			||||||
use File::Copy qw(copy);
 | 
					use File::Copy qw(copy);
 | 
				
			||||||
use File::Path qw(rmtree);
 | 
					use File::Path qw(rmtree);
 | 
				
			||||||
 
 | 
				
			|||||||
		Reference in New Issue
	
	Block a user