From ca37cdd0009298b677ffbc356741098d609c474d Mon Sep 17 00:00:00 2001
From: Daniel Friesel <derf@finalrewind.org>
Date: Fri, 2 Sep 2011 19:23:56 +0200
Subject: DeutscheBahn/Result.pm: Add route_timetable accessor

---
 t/20-db.t | 18 +++++++++++++++++-
 1 file changed, 17 insertions(+), 1 deletion(-)

(limited to 't')

diff --git a/t/20-db.t b/t/20-db.t
index 8b66ff9..03c25ef 100644
--- a/t/20-db.t
+++ b/t/20-db.t
@@ -4,7 +4,7 @@ use warnings;
 use 5.010;
 
 use File::Slurp qw(slurp);
-use Test::More tests => 96;
+use Test::More tests => 97;
 
 BEGIN {
 	use_ok('Travel::Status::DE::DeutscheBahn');
@@ -49,6 +49,22 @@ is_deeply([$departures[8]->route],
 	'Feldhausen', 'Dorsten', 'Hervest-Dorsten', 'Deuten', 'Rhade',
 	'Marbeck-Heiden', 'Borken(Westf)'], '9th result: route ok');
 
+is_deeply([$departures[8]->route_timetable],
+	[
+		['19:36', 'Essen-Borbeck'],
+		['19:43', 'Bottrop Hbf'],
+		['19:50', 'Gladbeck West'],
+		['19:53', 'Gladbeck-Zweckel'],
+		['19:56', 'Feldhausen'],
+		['20:01', 'Dorsten'],
+		['20:05', 'Hervest-Dorsten'],
+		['20:10', 'Deuten'],
+		['20:15', 'Rhade'],
+		['20:21', 'Marbeck-Heiden'],
+		['20:27', 'Borken(Westf)'],
+	],
+	'9th result: route_timetable ok');
+
 is_deeply([$departures[5]->route_interesting(3)],
 	['Essen-Steele', 'Essen-Steele Ost', 'Bochum'],
 	'6th result: route_interesting(3) ok');
-- 
cgit v1.2.3