Remove workarounds in WeatherData. Fixes bug #11401.

This commit is contained in:
Colin Kuskie 2010-03-01 09:58:18 -08:00
parent b462ce0b41
commit c0d45e0f23
2 changed files with 1 additions and 11 deletions

View file

@ -16,17 +16,6 @@ package WebGUI::Asset::Wobject::WeatherData;
use strict;
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;
return $self->$old_get_weather(@_);
};
}
use WebGUI::International;
use base 'WebGUI::Asset::Wobject';
use WebGUI::Utility;