summaryrefslogtreecommitdiff
path: root/t/20-db.t
diff options
context:
space:
mode:
authorDaniel Friesel <derf@finalrewind.org>2011-07-13 13:13:24 +0200
committerDaniel Friesel <derf@finalrewind.org>2011-07-13 13:13:24 +0200
commit10687196f1f39d01c17a415898758b3a65608396 (patch)
tree8b5a96f84880afb090e0910daaf81f6c1e5b08b8 /t/20-db.t
parentd463bbcd8475dd0261fb28efcc7b4b6d079a27a1 (diff)
DeutscheBahn/Result: Return only useful text in info, add info_raw for the raw string
Diffstat (limited to 't/20-db.t')
-rw-r--r--t/20-db.t5
1 files changed, 3 insertions, 2 deletions
diff --git a/t/20-db.t b/t/20-db.t
index cb84952..118c6cc 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 => 89;
+use Test::More tests => 90;
BEGIN {
use_ok('Travel::Status::DE::DeutscheBahn');
@@ -37,7 +37,8 @@ is($departures[-1]->platform, '12', 'last result: platform ok');
is($departures[8]->time, '19:31', '9th result: time ok');
is($departures[8]->train, 'NWB75366', '9th result: train ok');
-is($departures[8]->info, 'k.A.', '9th result: info ok');
+is($departures[8]->info_raw, 'k.A.', '9th result: info_raw ok');
+is($departures[8]->info, q{}, '9th result: info ok');
is_deeply([$departures[8]->route],
['Essen-Borbeck', 'Bottrop Hbf', 'Gladbeck West', 'Gladbeck-Zweckel',