diff options
Diffstat (limited to 'lib/Travel/Status/DE/IRIS/Result.pm')
| -rw-r--r-- | lib/Travel/Status/DE/IRIS/Result.pm | 2 |
1 files changed, 1 insertions, 1 deletions
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 " |