Commit c0bb8832 authored by Frédéric Buclin's avatar Frédéric Buclin

Bug 826678: Disable warnings about the deprecated Return::Value module when loading Email::Send

r=wicked a=LpSolit
parent 73aac8b5
...@@ -10,6 +10,12 @@ package Bugzilla::Config::MTA; ...@@ -10,6 +10,12 @@ package Bugzilla::Config::MTA;
use strict; use strict;
use Bugzilla::Config::Common; use Bugzilla::Config::Common;
# Return::Value 1.666002 pollutes the error log with warnings about this
# deprecated module. We have to set NO_CLUCK = 1 before loading Email::Send
# to disable these warnings.
BEGIN {
$Return::Value::NO_CLUCK = 1;
}
use Email::Send; use Email::Send;
our $sortkey = 1200; our $sortkey = 1200;
......
...@@ -22,6 +22,13 @@ use List::Util qw(max); ...@@ -22,6 +22,13 @@ use List::Util qw(max);
use Safe; use Safe;
use Term::ANSIColor; use Term::ANSIColor;
# Return::Value 1.666002 pollutes the error log with warnings about this
# deprecated module. We have to set NO_CLUCK = 1 before loading Email::Send
# in have_vers() to disable these warnings.
BEGIN {
$Return::Value::NO_CLUCK = 1;
}
use base qw(Exporter); use base qw(Exporter);
our @EXPORT = qw( our @EXPORT = qw(
REQUIRED_MODULES REQUIRED_MODULES
......
...@@ -23,6 +23,12 @@ use Encode qw(encode); ...@@ -23,6 +23,12 @@ use Encode qw(encode);
use Encode::MIME::Header; use Encode::MIME::Header;
use Email::Address; use Email::Address;
use Email::MIME; use Email::MIME;
# Return::Value 1.666002 pollutes the error log with warnings about this
# deprecated module. We have to set NO_CLUCK = 1 before loading Email::Send
# to disable these warnings.
BEGIN {
$Return::Value::NO_CLUCK = 1;
}
use Email::Send; use Email::Send;
sub MessageToMTA { sub MessageToMTA {
......
Markdown is supported
0% or
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment