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

Commit814e08e

Browse files
committed
plperl: Package-qualify _TD
Failing to do so causes trigger invocation to fail when they are nestedwithin a function invocation that changes the current package.Backpatch to 9.1; previous releases used a different method to obtain_TD. Per bug report from Mark Murawski (bug #6511)Author: Alex Hunsaker
1 parent02b183a commit814e08e

File tree

1 file changed

+1
-1
lines changed

1 file changed

+1
-1
lines changed

‎src/pl/plperl/plperl.c‎

Lines changed: 1 addition & 1 deletion
Original file line numberDiff line numberDiff line change
@@ -2062,7 +2062,7 @@ plperl_call_perl_trigger_func(plperl_proc_desc *desc, FunctionCallInfo fcinfo,
20622062
ENTER;
20632063
SAVETMPS;
20642064

2065-
TDsv=get_sv("_TD",0);
2065+
TDsv=get_sv("main::_TD",0);
20662066
if (!TDsv)
20672067
elog(ERROR,"couldn't fetch $_TD");
20682068

0 commit comments

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