MooseX::ClassAttribute::Meta::Role::Attribute - An attribute metaclass for class attributes in roles

MooseX-ClassAttribute documentation Contained in the MooseX-ClassAttribute distribution.

Index

Code Index:

NAME

Top

MooseX::ClassAttribute::Meta::Role::Attribute - An attribute metaclass for class attributes in roles

VERSION

Top

version 0.26

DESCRIPTION

Top

This class overrides Moose::Meta::Role::Attribute to support class attribute declaration in roles.

BUGS

Top

See MooseX::ClassAttribute for details.

AUTHOR

Top

Dave Rolsky <autarch@urth.org>

COPYRIGHT AND LICENSE

Top

This software is Copyright (c) 2011 by Dave Rolsky.

This is free software, licensed under:

  The Artistic License 2.0 (GPL Compatible)
MooseX-ClassAttribute documentation Contained in the MooseX-ClassAttribute distribution. 
package MooseX::ClassAttribute::Meta::Role::Attribute;
BEGIN {
  $MooseX::ClassAttribute::Meta::Role::Attribute::VERSION = '0.26';
}

use strict;
use warnings;

use List::MoreUtils qw( uniq );

use namespace::autoclean;
use Moose;

extends 'Moose::Meta::Role::Attribute';

sub new {
    my ( $class, $name, %options ) = @_;

    $options{traits} = [
        uniq( @{ $options{traits} || [] } ),
        'MooseX::ClassAttribute::Trait::Attribute'
    ];

    return $class->SUPER::new( $name, %options );
}

1;

# ABSTRACT: An attribute metaclass for class attributes in roles





__END__