Location via proxy:   [ UP ]  
[Report a bug]   [Manage cookies]                
Skip to content

Commit 2520cf8

Browse files
committed
Fix test failure with non-MULTIPLICITY Perl interpreters.
Per buildfarm.
1 parent e6f1e56 commit 2520cf8

File tree

2 files changed

+8
-0
lines changed

2 files changed

+8
-0
lines changed

src/pl/plperl/expected/plperl_setup.out

+3
Original file line numberDiff line numberDiff line change
@@ -32,6 +32,9 @@ SELECT foo1();
3232
1
3333
(1 row)
3434

35+
-- Must reconnect to avoid failure with non-MULTIPLICITY Perl interpreters
36+
\c -
37+
SET ROLE regress_user1;
3538
-- Should be able to change privileges on the language
3639
revoke all on language plperl from public;
3740
SET ROLE regress_user2;

src/pl/plperl/sql/plperl_setup.sql

+5
Original file line numberDiff line numberDiff line change
@@ -31,6 +31,11 @@ CREATE EXTENSION plperlu; -- fail
3131
CREATE FUNCTION foo1() returns int language plperl as '1;';
3232
SELECT foo1();
3333

34+
-- Must reconnect to avoid failure with non-MULTIPLICITY Perl interpreters
35+
\c -
36+
37+
SET ROLE regress_user1;
38+
3439
-- Should be able to change privileges on the language
3540
revoke all on language plperl from public;
3641

0 commit comments

Comments
 (0)