add test cases for imaginary station and no results in timeframe

1 files changed, 18 insertions, 1 deletions

diff --git a/t/31-result-basics.t b/t/31-result-basics.t
index 206134c..9a76e91 100644
--- a/t/31-result-basics.t
+++ b/t/31-result-basics.t
@@ -5,7 +5,7 @@ use 5.014;
 use utf8;
 
 use DateTime;
-use Test::More tests => 434;
+use Test::More tests => 435;
 use Test::Fatal;
 
 use Travel::Status::DE::IRIS;
@@ -70,3 +70,20 @@ for my $i (0 .. $#results) {
 	is($r->destination, $r->route_end, "results[$i]: destination == routd_end");
 	is($r->train, $r->line, "results[$i]: line == train");
 }
+
+$status = Travel::Status::DE::IRIS->new(
+	iris_base => 'file:t/in',
+	station   => 'EE',
+	datetime  => DateTime->new(
+		year      => 2014,
+		month     => 1,
+		day       => 5,
+		hour      => 20,
+		minute    => 1,
+		time_zone => 'Europe/Berlin'
+	)
+);
+
+@results = $status->results;
+
+is(@results, 0, 'no data available -> empty result list');