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 --- lib/WWW/Efa/Error/Setup.pm | 18 ++++++++++++++++++ 1 file changed, 18 insertions(+) (limited to 'lib/WWW/Efa/Error') diff --git a/lib/WWW/Efa/Error/Setup.pm b/lib/WWW/Efa/Error/Setup.pm index f35dcee..386613b 100644 --- a/lib/WWW/Efa/Error/Setup.pm +++ b/lib/WWW/Efa/Error/Setup.pm @@ -60,4 +60,22 @@ sub as_string { ); } +=head2 $error->option() + +Returns the option which caused the error. + +=head2 $error->value() + +Returns the value which caused the error. + +=head2 $error->message() + +Returns a message describing what went wrong and how to fix it. + +=cut + +sub option { return $_[0]->{'key'} } +sub value { return $_[0]->{'value'} } +sub message { return $_[0]->{'message'} } + 1; -- cgit v1.2.3