36 |
and _canceled is false |
and _canceled is false |
37 |
}); |
}); |
38 |
|
|
39 |
$sth->execute( $self->token ); |
my $token = $self->token; |
40 |
|
|
41 |
|
$sth->execute( $token ); |
42 |
|
|
43 |
if ( $sth->rows == 0 ) { |
if ( $sth->rows == 0 ) { |
44 |
warn "can't confirm ", $self->token, " check if it's allready confirmed"; |
warn "can't confirm ", $self->token, " check if it's allready confirmed"; |
49 |
md5(id||email) = ? |
md5(id||email) = ? |
50 |
and _confirmed is true |
and _confirmed is true |
51 |
}); |
}); |
52 |
$sth->execute( $self->token ); |
$sth->execute( $token ); |
53 |
} |
} |
54 |
|
|
55 |
if ( $sth->rows == 1 ) { |
if ( $sth->rows == 1 ) { |
56 |
|
|
57 |
die "can't find account associated with ", $self->token unless $sth->rows == 1; |
die qq|<error>can't find account associated with $token</error>| unless $sth->rows == 1; |
58 |
|
|
59 |
return $self->seat_confirmation_message( token => $self->token ); |
return $self->seat_confirmation_message( token => $token ); |
60 |
|
|
61 |
} else { |
} else { |
62 |
die "Problem with confirmation.\n"; |
die qq|<error>Can't find confirmation $token<br> |
63 |
|
Did you copy-pasted whole URL in your browser?</error>|; |
64 |
} |
} |
65 |
} |
} |
66 |
|
|
85 |
Your <em>reservation is canceled</em>, thanks for your effort to provide seat to somebody else |
Your <em>reservation is canceled</em>, thanks for your effort to provide seat to somebody else |
86 |
|; |
|; |
87 |
} else { |
} else { |
88 |
die "Problem with cancelation.\n"; |
die qq|<error>Can't find reservation which you are trying to cancel.<br> |
89 |
|
Did you copy-pasted whole URL in your browser?</error>|; |
90 |
} |
} |
91 |
} |
} |
92 |
|
|