Reaction::Meta::InterfaceModel::Action::Class - Reaction::Meta::InterfaceModel::Action::Class documentation


Reaction documentation Contained in the Reaction distribution.

Index


Code Index:

NAME

Top

Reaction::Meta::InterfaceModel::Action::Class

DESCRIPTION

Top

parameter_attributes

AUTHORS

Top

See Reaction::Class for authors.

LICENSE

Top

See Reaction::Class for the license.


Reaction documentation Contained in the Reaction distribution.

package Reaction::Meta::InterfaceModel::Action::Class;

use Reaction::Class;
use aliased 'Reaction::Meta::InterfaceModel::Action::ParameterAttribute';

use namespace::clean -except => [ qw(meta) ];
extends 'Reaction::Meta::Class';

around initialize => sub {
  my $super = shift;
  my $class = shift;
  my $pkg   = shift;
  $super->($class, $pkg, attribute_metaclass => ParameterAttribute, @_);
};
sub parameter_attributes {
  my $self = shift;
  return grep { $_->isa(ParameterAttribute) } 
    $self->get_all_attributes;
};

__PACKAGE__->meta->make_immutable(inline_constructor => 0);

  
1;