diff options
| author | Frédéric Buclin <LpSolit@gmail.com> | 2013-01-06 00:26:36 +0100 |
|---|---|---|
| committer | Frédéric Buclin <LpSolit@gmail.com> | 2013-01-06 00:26:36 +0100 |
| commit | d758a8169eacbccc0a65d6fd68e49f8eb8b713be (patch) | |
| tree | d52cbe76cced45b2b7717ac0a6a6c2de8e6616cb | |
| parent | aea14709d4e25299cfe3aa3b0dc76344727f7b0b (diff) | |
| download | bugzilla-d758a8169eacbccc0a65d6fd68e49f8eb8b713be.tar.gz bugzilla-d758a8169eacbccc0a65d6fd68e49f8eb8b713be.tar.xz | |
Bug 826678: Disable warnings about the deprecated Return::Value module when loading Email::Send
r=wicked a=LpSolit
| -rw-r--r-- | Bugzilla/Config/MTA.pm | 6 | ||||
| -rw-r--r-- | Bugzilla/Install/Requirements.pm | 7 | ||||
| -rw-r--r-- | Bugzilla/Mailer.pm | 6 |
3 files changed, 19 insertions, 0 deletions
diff --git a/Bugzilla/Config/MTA.pm b/Bugzilla/Config/MTA.pm index c90e5dc76..aeded375f 100644 --- a/Bugzilla/Config/MTA.pm +++ b/Bugzilla/Config/MTA.pm @@ -34,6 +34,12 @@ package Bugzilla::Config::MTA; use strict; 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; our $sortkey = 1200; diff --git a/Bugzilla/Install/Requirements.pm b/Bugzilla/Install/Requirements.pm index 1e7fc97c6..39cacedb0 100644 --- a/Bugzilla/Install/Requirements.pm +++ b/Bugzilla/Install/Requirements.pm @@ -32,6 +32,13 @@ use List::Util qw(max); use Safe; 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); our @EXPORT = qw( REQUIRED_MODULES diff --git a/Bugzilla/Mailer.pm b/Bugzilla/Mailer.pm index 7e42cb609..1c4fb6188 100644 --- a/Bugzilla/Mailer.pm +++ b/Bugzilla/Mailer.pm @@ -48,6 +48,12 @@ use Encode qw(encode); use Encode::MIME::Header; use Email::Address; 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; sub MessageToMTA { |