diff options
Diffstat (limited to 'src/pl/plperl/plc_perlboot.pl')
| -rw-r--r-- | src/pl/plperl/plc_perlboot.pl | 1 |
1 files changed, 1 insertions, 0 deletions
diff --git a/src/pl/plperl/plc_perlboot.pl b/src/pl/plperl/plc_perlboot.pl index 05334a662d3..f41aa80e80b 100644 --- a/src/pl/plperl/plc_perlboot.pl +++ b/src/pl/plperl/plc_perlboot.pl @@ -62,6 +62,7 @@ sub ::encode_array_constructor (my $msg = shift) =~ s/\(eval \d+\) //g; chomp $msg; &::elog(&::WARNING, $msg); + return; } $SIG{__WARN__} = \&plperl_warn; |