From fec4f0d857fb35a7c6cd35a51694671651b23df7 Mon Sep 17 00:00:00 2001 From: Daniel Friesel Date: Sat, 14 Aug 2010 00:05:28 +0200 Subject: WWW::Efa::Error::Setup: Add accessors for inernals --- t/50-www-efa.t | 6 +++--- 1 file changed, 3 insertions(+), 3 deletions(-) (limited to 't') diff --git a/t/50-www-efa.t b/t/50-www-efa.t index e527272..bae1e94 100644 --- a/t/50-www-efa.t +++ b/t/50-www-efa.t @@ -80,15 +80,15 @@ sub is_efa_err { isa_ok($efa->{'error'}, 'WWW::Efa::Error::Setup'); is( - $efa->{'error'}->{'key'}, $key, + $efa->{'error'}->option(), $key, "$key => $val: Error: Correct key", ); is( - $efa->{'error'}->{'value'}, $val_want, + $efa->{'error'}->value(), $val_want, "$key => $val: Error: Correct valuef", ); is( - $efa->{'error'}->{'message'}, $str, + $efa->{'error'}->message(), $str, "$key => $val: Error: String is '$str'", ); } -- cgit v1.2.3