--- trunk/lib/App/RoomReservation/Reservation.pm 2009/06/30 10:26:49 1120 +++ trunk/lib/App/RoomReservation/Reservation.pm 2009/06/30 13:24:03 1121 @@ -81,6 +81,11 @@ default => sub { 0 }, ); +has _seat_number => ( + is => 'rw', + isa => 'Int', +); + sub BUILD { my $self = shift; die "e-mail not verified\n" unless $self->email eq $self->email_verify;