diff options
Diffstat (limited to 'lib/Travel/Status/DE/IRIS.pm')
-rw-r--r-- | lib/Travel/Status/DE/IRIS.pm | 3 |
1 files changed, 1 insertions, 2 deletions
diff --git a/lib/Travel/Status/DE/IRIS.pm b/lib/Travel/Status/DE/IRIS.pm index da39a7c..34f7fc4 100644 --- a/lib/Travel/Status/DE/IRIS.pm +++ b/lib/Travel/Status/DE/IRIS.pm @@ -13,7 +13,6 @@ use DateTime; use Encode qw(encode decode); use List::Util qw(first); use LWP::UserAgent; -use Scalar::Util qw(weaken); use Travel::Status::DE::IRIS::Result; use XML::LibXML; @@ -298,7 +297,7 @@ sub get_realtime { sub get_result_by_id { my ( $self, $id ) = @_; - my $res = first { $_->{raw_id} eq $id } $self->results; + my $res = first { $_->wing_id eq $id } @{ $self->{results} }; return $res; } |