1 package Text::Tradition::User;
9 has 'password' => (is => 'rw', required => 1);
10 has 'traditions' => (is => 'rw', isa => 'ArrayRef[Text::Tradition]', required => 0);
12 # after add_tradition => sub {
13 # $tradition->set_user($self)
14 # unless $tradition->user->username eq $self->name;