Froody::ErrorType - object representing a Froody Error Type

Froody documentation Contained in the Froody distribution.

Index

Code Index:

NAME

Top

Froody::ErrorType - object representing a Froody Error Type

SYNOPSIS

Top

  # create
  use Froody::ErrorType;
  my $method = Froody::ErrorType->new()
                            ->name("wibble.fred.burt")
                            ->message("Wibbling error.")

DESCRIPTION

Top

METHODS

Top

name / code / full_name

The name of the errortype. This is the code that is used to call this type of error.

structure

The extracted structure of the errortype, with the top level node replaced with '.'.

BUGS

Top

None known.

Please report any bugs you find via the CPAN RT system. http://rt.cpan.org/NoAuth/ReportBug.html?Queue=Froody

AUTHOR

Top

Copyright Fotango 2005. All rights reserved.

Please see the main Froody documentation for details of who has worked on this project.

This module is free software; you can redistribute it and/or modify it under the same terms as Perl itself.

SEE ALSO

Top

Froody, Froody::Repository

Froody documentation Contained in the Froody distribution. 
package Froody::ErrorType;
use base qw(Froody::Structure);
use strict;
use warnings;

use Scalar::Util qw(blessed weaken);

our $VERSION = 0.01;

__PACKAGE__->mk_accessors( "name", "message" );
sub code { my $self = shift; $self->name( @_ ) }
sub full_name { my $self = shift; $self->name( @_ ) }

sub init {
  my $self = shift;

  # set up the default structure
  $self->structure({'err' => {
     'attr' => [
                 'code',
                 'msg'
               ],
     'elts' => [],
  }});
  return $self;
}


1;