|
|
@ -1479,17 +1479,14 @@ get '/documentation' => sub { |
|
|
|
); |
|
|
|
); |
|
|
|
} => 'documentation'; |
|
|
|
} => 'documentation'; |
|
|
|
|
|
|
|
|
|
|
|
# Routes for feedback. One get to display the form |
|
|
|
# Route for feedback form |
|
|
|
# and one post to get data from it |
|
|
|
any [ qw(GET POST) ] => '/feedback' => sub { |
|
|
|
get '/feedback' => sub { |
|
|
|
|
|
|
|
my $self = shift; |
|
|
|
my $self = shift; |
|
|
|
$self->stash( |
|
|
|
if ($self->req->method eq 'GET'){ |
|
|
|
|
|
|
|
return $self->render('feedback', |
|
|
|
page => 'feedback' |
|
|
|
page => 'feedback' |
|
|
|
); |
|
|
|
); |
|
|
|
} => 'feedback'; |
|
|
|
} |
|
|
|
|
|
|
|
|
|
|
|
post '/feedback' => sub { |
|
|
|
|
|
|
|
my $self = shift; |
|
|
|
|
|
|
|
my $email = $self->param('email') || ''; |
|
|
|
my $email = $self->param('email') || ''; |
|
|
|
my $comment = $self->param('comment'); |
|
|
|
my $comment = $self->param('comment'); |
|
|
|
my $sent = $self->mail( |
|
|
|
my $sent = $self->mail( |
|
|
|