From c6b1f38efbc1029ee54ea396c300a2e62f6607c1 Mon Sep 17 00:00:00 2001 From: Daniel Friesel Date: Sat, 28 Jan 2017 18:50:54 +0100 Subject: Support ->lookbehind for delayed trains from previous hours --- t/20-iris-class.t | 3 ++- t/31-result-basics.t | 3 ++- 2 files changed, 4 insertions(+), 2 deletions(-) (limited to 't') diff --git a/t/20-iris-class.t b/t/20-iris-class.t index ba3882b..8ec50ef 100644 --- a/t/20-iris-class.t +++ b/t/20-iris-class.t @@ -21,7 +21,8 @@ my $status = Travel::Status::DE::IRIS->new( hour => 20, minute => 1, time_zone => 'Europe/Berlin', - ) + ), + lookahead => 3 * 60 + 59, ); isa_ok( $status, 'Travel::Status::DE::IRIS' ); diff --git a/t/31-result-basics.t b/t/31-result-basics.t index f88fa6f..ac2b23d 100644 --- a/t/31-result-basics.t +++ b/t/31-result-basics.t @@ -20,7 +20,8 @@ my $status = Travel::Status::DE::IRIS->new( hour => 20, minute => 1, time_zone => 'Europe/Berlin' - ) + ), + lookahead => 3 * 60 + 59, ); my @results = $status->results; -- cgit v1.2.3