diff options
author | Daniel Friesel <derf@finalrewind.org> | 2015-09-28 18:06:25 +0200 |
---|---|---|
committer | Daniel Friesel <derf@finalrewind.org> | 2015-09-28 18:06:25 +0200 |
commit | 53fcd15fe7667628f4d5c4f2c1b2dc49f174d67c (patch) | |
tree | a90b3a2f16b3b628bcf0488ed985736546b868bd /t | |
parent | 14055f3ecdeaada8f0e871f5943417bc236738a9 (diff) |
EFA: Handle ambiguous input properly (explicit accessors for candidate lists)
Diffstat (limited to 't')
-rw-r--r-- | t/21-vrr-ambig.t | 8 |
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'); |