Parent Directory | Revision Log | Patch
revision 1120 by dpavlin, Tue Jun 30 10:26:49 2009 UTC | revision 1121 by dpavlin, Tue Jun 30 13:24:03 2009 UTC | |
---|---|---|
# | Line 81 has _confirmed => ( | Line 81 has _confirmed => ( |
81 | default => sub { 0 }, | default => sub { 0 }, |
82 | ); | ); |
83 | ||
84 | has _seat_number => ( | |
85 | is => 'rw', | |
86 | isa => 'Int', | |
87 | ); | |
88 | ||
89 | sub BUILD { | sub BUILD { |
90 | my $self = shift; | my $self = shift; |
91 | die "e-mail not verified\n" unless $self->email eq $self->email_verify; | die "e-mail not verified\n" unless $self->email eq $self->email_verify; |
|
ViewVC Help | |
Powered by ViewVC 1.1.26 |