Movatterモバイル変換

[0]ホーム
URL:

Skip to content

Navigation Menu

Sign in
Appearance settings

Search code, repositories, users, issues, pull requests...

Provide feedback

We read every piece of feedback, and take your input very seriously.

Saved searches

Use saved searches to filter your results more quickly

 Sign up
Appearance settings

Commit4b0d21b

Browse files
committed
Fix PostgreSQL::Test aliasing for Perl v5.10.1.
This Perl segfaults if a declaration of the to-be-aliased packageprecedes the aliasing itself. Per buildfarm members lapwing and wrasse.Like commit2091177, back-patch to v10(all supported versions).Discussion:https://postgr.es/m/20220625171533.GA2012493@rfd.leadboat.com
1 parentace9973 commit4b0d21b

File tree

2 files changed

+2
-12
lines changed

2 files changed

+2
-12
lines changed

‎src/test/perl/PostgreSQL/Test/Cluster.pm

Lines changed: 1 addition & 6 deletions
Original file line numberDiff line numberDiff line change
@@ -5,14 +5,9 @@
55
# package the same symbol table as the older package. See PostgresNode::new
66
# for supporting heuristics.
77

8-
packagePostgreSQL::Test::Cluster;
9-
108
use strict;
119
use warnings;
12-
13-
use PostgresNode;
1410
BEGIN { *PostgreSQL::Test::Cluster:: = \*PostgresNode::; }
15-
16-
use Exporter'import';
11+
use PostgresNode ();
1712

1813
1;

‎src/test/perl/PostgreSQL/Test/Utils.pm

Lines changed: 1 addition & 6 deletions
Original file line numberDiff line numberDiff line change
@@ -3,14 +3,9 @@
33
# Allow use of release 15+ Perl package name in older branches, by giving that
44
# package the same symbol table as the older package.
55

6-
packagePostgreSQL::Test::Utils;
7-
86
use strict;
97
use warnings;
10-
11-
use TestLib;
128
BEGIN { *PostgreSQL::Test::Utils:: = \*TestLib::; }
13-
14-
use Exporter'import';
9+
use TestLib ();
1510

1611
1;

0 commit comments

Comments
 (0)
[8]ページ先頭
©2009-2025 Movatter.jp