From 416ac6343a5698e7627b85c8c5ed1933b1b6ee1d Mon Sep 17 00:00:00 2001 From: Finn Date: Thu, 7 Sep 2017 12:53:01 +0100 Subject: [PATCH] Added ability to delete transactions successfully --- lib/Pear/LocalLoop.pm | 1 + .../Controller/Admin/Transactions.pm | 15 +++++ templates/admin/transactions/read.html.ep | 56 +++++++++++-------- 3 files changed, 48 insertions(+), 24 deletions(-) diff --git a/lib/Pear/LocalLoop.pm b/lib/Pear/LocalLoop.pm index d874fa6..7a5697c 100644 --- a/lib/Pear/LocalLoop.pm +++ b/lib/Pear/LocalLoop.pm @@ -189,6 +189,7 @@ sub startup { $admin_routes->get('/transactions')->to('admin-transactions#index'); $admin_routes->get('/transactions/:id')->to('admin-transactions#read'); $admin_routes->get('/transactions/:id/image')->to('admin-transactions#image'); + $admin_routes->get('/transactions/:id/delete')->to('admin-transactions#delete'); # my $user_routes = $r->under('/')->to('root#under'); diff --git a/lib/Pear/LocalLoop/Controller/Admin/Transactions.pm b/lib/Pear/LocalLoop/Controller/Admin/Transactions.pm index ecb18a0..428fdf9 100644 --- a/lib/Pear/LocalLoop/Controller/Admin/Transactions.pm +++ b/lib/Pear/LocalLoop/Controller/Admin/Transactions.pm @@ -48,4 +48,19 @@ sub image { } } +sub delete { + my $c = shift; + + my $id = $c->param('id'); + +if ( my $transaction = $c->result_set->find($id) ) { + $transaction->delete; + $c->flash( success => 'Successfully deleted transaction' ); + $c->redirect_to( '/admin/transactions' ); + } else { + $c->flash( error => 'No transaction found' ); + $c->redirect_to( '/admin/transactions' ); + } +} + 1; diff --git a/templates/admin/transactions/read.html.ep b/templates/admin/transactions/read.html.ep index a40f384..5cbf658 100644 --- a/templates/admin/transactions/read.html.ep +++ b/templates/admin/transactions/read.html.ep @@ -11,28 +11,36 @@ Success! <%= $success %> % } -
-
- - +
+

+ Transaction Details + Delete Transaction +

+
+ +
+ + +
+
+ + +
+
+ + +
+
+ + +
+
+ + +
+
+ +
+
-
- - -
-
- - -
-
- - -
-
- - -
-
- -
- +