summaryrefslogtreecommitdiff
path: root/t/20-aseag.t
diff options
context:
space:
mode:
Diffstat (limited to 't/20-aseag.t')
-rw-r--r--t/20-aseag.t16
1 files changed, 16 insertions, 0 deletions
diff --git a/t/20-aseag.t b/t/20-aseag.t
index cd3f043..2d96037 100644
--- a/t/20-aseag.t
+++ b/t/20-aseag.t
@@ -16,6 +16,14 @@ require_ok('Travel::Status::DE::ASEAG');
my $rawstr = slurp('t/in/aseag_20131223T132300');
my $s = Travel::Status::DE::ASEAG->new_from_raw(
+ datetime => DateTime->new(
+ year => 2014,
+ month => 1,
+ day => 3,
+ hour => 20,
+ minute => 1,
+ time_zone => 'Europe/Berlin'
+ ),
raw_str => $rawstr,
hide_past => 0
);
@@ -60,6 +68,14 @@ is( ( first { $_->stop ne 'Aachen Bushof' } @results ),
# exact matching: also works in constructor
$s = Travel::Status::DE::ASEAG->new_from_raw(
+ datetime => DateTime->new(
+ year => 2014,
+ month => 1,
+ day => 3,
+ hour => 20,
+ minute => 1,
+ time_zone => 'Europe/Berlin'
+ ),
raw_str => $rawstr,
hide_past => 0,
stop => 'Aachen Bushof',