From c29f487ec8dda9b156ae924cc00cc6a72b31a495 Mon Sep 17 00:00:00 2001 From: Daniel Friesel Date: Tue, 21 Jan 2014 14:49:44 +0100 Subject: add test cases for imaginary station and no results in timeframe --- t/31-result-basics.t | 19 ++++++++++++++++++- 1 file changed, 18 insertions(+), 1 deletion(-) (limited to 't/31-result-basics.t') 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'); -- cgit v1.2.3