
Data::MultiValued::AttributeTrait::Tags - attribute traits for attributes holding tagged values

version 0.0.1_4

package My::Class;
use Moose;
use Data::MultiValued::AttributeTrait::Tags;
has stuff => (
is => 'rw',
isa => 'Int',
traits => ['MultiValued::Tags'],
predicate => 'has_stuff',
multi_accessor => 'stuff_tagged',
multi_predicate => 'has_stuff_tagged',
);

This role consumes Data::MultiValued::AttributeTrait and specialises it to use Data::MultiValued::Tags as multi-value storage:
multivalue_storage_classReturns 'Data::MultiValued::Tags'.
opts_to_pass_setReturns ('tag').
opts_to_pass_getReturns ('tag').

Gianni Ceccarelli <dakkar@thenautilus.net>

This software is copyright (c) 2011 by Net-a-Porter.com.
This is free software; you can redistribute it and/or modify it under the same terms as the Perl 5 programming language system itself.