Added error flag to validation errors and added age_range api endpoint
This commit is contained in:
parent
6fac2058bc
commit
b03b7ccc5f
3 changed files with 25 additions and 0 deletions
|
@ -62,6 +62,7 @@ sub startup {
|
||||||
json => {
|
json => {
|
||||||
success => Mojo::JSON->false,
|
success => Mojo::JSON->false,
|
||||||
message => $c->error_messages->{$val}->{$check}->{message},
|
message => $c->error_messages->{$val}->{$check}->{message},
|
||||||
|
error => $check,
|
||||||
},
|
},
|
||||||
status => $c->error_messages->{$val}->{$check}->{status},
|
status => $c->error_messages->{$val}->{$check}->{status},
|
||||||
);
|
);
|
||||||
|
@ -98,6 +99,9 @@ sub startup {
|
||||||
$r->post('/register')->to('register#register');
|
$r->post('/register')->to('register#register');
|
||||||
$r->any('/logout')->to('root#auth_logout');
|
$r->any('/logout')->to('root#auth_logout');
|
||||||
|
|
||||||
|
my $api_public_get = $r->under('/api');
|
||||||
|
$api_public_get->get('/info/ages')->to('api-info#get_ages');
|
||||||
|
|
||||||
# Always available api routes
|
# Always available api routes
|
||||||
my $api_public = $r->under('/api')->to('api-auth#check_json');
|
my $api_public = $r->under('/api')->to('api-auth#check_json');
|
||||||
|
|
||||||
|
|
12
lib/Pear/LocalLoop/Controller/Api/Info.pm
Normal file
12
lib/Pear/LocalLoop/Controller/Api/Info.pm
Normal file
|
@ -0,0 +1,12 @@
|
||||||
|
package Pear::LocalLoop::Controller::Api::Info;
|
||||||
|
use Mojo::Base 'Mojolicious::Controller';
|
||||||
|
|
||||||
|
sub get_ages {
|
||||||
|
my $c = shift;
|
||||||
|
|
||||||
|
my $ages = $c->schema->resultset('AgeRange');
|
||||||
|
|
||||||
|
$c->render( json => { ages => [ $ages->all ] } );
|
||||||
|
}
|
||||||
|
|
||||||
|
1;
|
|
@ -25,4 +25,13 @@ __PACKAGE__->has_many(
|
||||||
{ cascade_copy => 0, cascade_delete => 0 },
|
{ cascade_copy => 0, cascade_delete => 0 },
|
||||||
);
|
);
|
||||||
|
|
||||||
|
sub TO_JSON {
|
||||||
|
my $self = shift;
|
||||||
|
|
||||||
|
return {
|
||||||
|
id => $self->id,
|
||||||
|
string => $self->string,
|
||||||
|
};
|
||||||
|
}
|
||||||
|
|
||||||
1;
|
1;
|
||||||
|
|
Reference in a new issue