From d758a8169eacbccc0a65d6fd68e49f8eb8b713be Mon Sep 17 00:00:00 2001 From: Frédéric Buclin Date: Sun, 6 Jan 2013 00:26:36 +0100 Subject: Bug 826678: Disable warnings about the deprecated Return::Value module when loading Email::Send r=wicked a=LpSolit --- Bugzilla/Config/MTA.pm | 6 ++++++ Bugzilla/Install/Requirements.pm | 7 +++++++ Bugzilla/Mailer.pm | 6 ++++++ 3 files changed, 19 insertions(+) (limited to 'Bugzilla') 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 { -- cgit v1.2.3-24-g4f1b