From eabf885d15ce6bbafc0a737f1ecd171f6067d5ed Mon Sep 17 00:00:00 2001 From: Daniel Friesel Date: Thu, 24 Nov 2016 22:55:50 +0100 Subject: minor optimization --- lib/Travel/Status/DE/IRIS/Result.pm | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) (limited to 'lib/Travel/Status/DE/IRIS') diff --git a/lib/Travel/Status/DE/IRIS/Result.pm b/lib/Travel/Status/DE/IRIS/Result.pm index d1f2ccd..75bff00 100644 --- a/lib/Travel/Status/DE/IRIS/Result.pm +++ b/lib/Travel/Status/DE/IRIS/Result.pm @@ -141,7 +141,7 @@ sub new { my $dp = $ref->{departure} = $ref->{sched_departure} = $ref->parse_ts( $opt{departure_ts} ); - if ( not( $ar or $dp ) ) { + if ( not( defined $ar or defined $dp ) ) { cluck( sprintf( "Neither arrival '%s' nor departure '%s' are valid " -- cgit v1.2.3