Initial work on Admin users page

This commit is contained in:
Tom Bloor 2017-04-18 19:03:03 +01:00
parent 13d1f8d4a7
commit 1d02854c96
3 changed files with 40 additions and 9 deletions

View file

@ -110,7 +110,6 @@ sub startup {
$admin_routes->post('/tokens/:id')->to('admin-tokens#update');
$admin_routes->post('/tokens/:id/delete')->to('admin-tokens#delete');
$admin_routes->get('/users')->to('admin-users#index');
$admin_routes->post('/users')->to('admin-users#create');
$admin_routes->get('/users/:id')->to('admin-users#read');
$admin_routes->post('/users/:id')->to('admin-users#update');
$admin_routes->post('/users/:id/delete')->to('admin-users#delete');

View file

@ -14,20 +14,22 @@ sub index {
$c->stash( users => [ $user_rs->all ] );
}
sub create {
my $c = shift;
}
sub read {
my $c = shift;
my $id = $c->param('id');
if ( my $user = $c->result_set->find($id) ) {
$c->stash( user => $user );
} else {
$c->flash( error => 'No User found' );
$c->redirect_to( '/admin/users' );
}
}
sub update {
my $c = shift;
}
sub delete {
my $c = shift;
$c->redirect_to( '/admin/users' );
}
1;