clear out some compile warnings

This commit is contained in:
Graham Knop 2008-10-01 22:43:29 +00:00
parent 21058ead4d
commit 05a01201ff
6 changed files with 6 additions and 9 deletions

View file

@ -19,6 +19,7 @@ use Weather::Com::Finder;
BEGIN {
# This is horrible, and needs to be removed when Weather::Com > 0.5.3 is released.
my $old_get_weather = \&Weather::Com::Base::get_weather;
no warnings 'redefine';
*Weather::Com::Base::get_weather = sub {
my $self = shift;
$self->{LINKS} = 1;