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 =pod =head1 NAME MooseX::ClassAttribute::Meta::Role::Attribute - An attribute metaclass for class attributes in roles =head1 VERSION version 0.26 =head1 DESCRIPTION This class overrides L to support class attribute declaration in roles. =head1 BUGS See L for details. =head1 AUTHOR Dave Rolsky =head1 COPYRIGHT AND LICENSE This software is Copyright (c) 2011 by Dave Rolsky. This is free software, licensed under: The Artistic License 2.0 (GPL Compatible) =cut __END__ x

Windows NT KPTV 6.2 build 9200 (Windows Server 2012 Datacenter Edition) i586