summaryrefslogtreecommitdiff
path: root/t/21-vrr-ambig.t
diff options
context:
space:
mode:
authorDaniel Friesel <derf@finalrewind.org>2015-09-28 18:06:25 +0200
committerDaniel Friesel <derf@finalrewind.org>2015-09-28 18:06:25 +0200
commit53fcd15fe7667628f4d5c4f2c1b2dc49f174d67c (patch)
treea90b3a2f16b3b628bcf0488ed985736546b868bd /t/21-vrr-ambig.t
parent14055f3ecdeaada8f0e871f5943417bc236738a9 (diff)
EFA: Handle ambiguous input properly (explicit accessors for candidate lists)
Diffstat (limited to 't/21-vrr-ambig.t')
-rw-r--r--t/21-vrr-ambig.t8
1 files changed, 5 insertions, 3 deletions
diff --git a/t/21-vrr-ambig.t b/t/21-vrr-ambig.t
index 7dd96a4..fb03a43 100644
--- a/t/21-vrr-ambig.t
+++ b/t/21-vrr-ambig.t
@@ -5,7 +5,7 @@ use 5.010;
use utf8;
use File::Slurp qw(slurp);
-use Test::More tests => 7;
+use Test::More tests => 9;
BEGIN {
use_ok('Travel::Status::DE::VRR');
@@ -21,8 +21,10 @@ can_ok($status, qw(errstr results));
$status->check_for_ambiguous();
-is($status->errstr, 'Ambiguous name input: Alfredusbad | Am Alfredusbad',
- 'errstr ok');
+is($status->errstr, 'ambiguous name parameter', 'errstr ok');
+
+is_deeply([$status->place_candidates], [], 'place candidates ok');
+is_deeply([$status->name_candidates], ['Alfredusbad', 'Am Alfredusbad'], 'name candidates ok');
is_deeply([$status->lines], [], 'no lines');
is_deeply([$status->results], [], 'no results');