diff options
-rw-r--r-- | t/21-iris-stations.t | 7 |
1 files changed, 6 insertions, 1 deletions
diff --git a/t/21-iris-stations.t b/t/21-iris-stations.t index 0443989..55938c4 100644 --- a/t/21-iris-stations.t +++ b/t/21-iris-stations.t @@ -3,13 +3,18 @@ use strict; use warnings; use 5.014; -use Test::More tests => 10; +use Test::More tests => 11; BEGIN { use_ok('Travel::Status::DE::IRIS::Stations'); } require_ok('Travel::Status::DE::IRIS::Stations'); +my @emptypairs = grep { not (length($_->[0]) and length($_->[1])) } + Travel::Status::DE::IRIS::Stations::get_stations; + +is_deeply(\@emptypairs, [], 'no stations with empty code / name'); + is_deeply( [], [ Travel::Status::DE::IRIS::Stations::get_station('doesnotexist') ], |