Test::Able::Object - Test::Able's base object

Test-Able documentation Contained in the Test-Able distribution.

Index

Code Index:

NAME

Top

Test::Able::Object - Test::Able's base object

DESCRIPTION

Top

This object serves the same purpose as, and is a subclass of, Moose::Object.

METHODS

Top

BUILD

Standard Moose BUILD method that builds all the test-related method lists.

run_tests

A convenience method around run_tests in Test::Able::Role::Meta::Class. Can be called as a class or instance method.

AUTHOR

Top

Justin DeVuyst, justin@devuyst.com

COPYRIGHT AND LICENSE

Top

Copyright 2009 by Justin DeVuyst.

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

Test-Able documentation Contained in the Test-Able distribution. 
package Test::Able::Object;

use Moose;
use strict;
use warnings;

extends( 'Moose::Object' );


sub BUILD {
    my ( $self, ) = @_;

    $self->meta->current_test_object( $self, );
    $self->meta->build_all_methods;
    $self->meta->clear_current_test_object;

    return;
}


sub run_tests {
    my ( $proto, ) = @_;

    my $self = ref $proto ? $proto : $proto->new;
    $self->meta->current_test_object( $self, );
    $self->meta->run_tests;
    $self->meta->clear_current_test_object;

    return;
}


1;