This repository has been archived on 2023-08-16. You can view files and clone it, but cannot push or open issues or pull requests.
Foodloop-Server/lib/Pear/LocalLoop/Controller/Admin/Transactions.pm

55 lines
1.2 KiB
Perl
Raw Normal View History

package Pear::LocalLoop::Controller::Admin::Transactions;
use Mojo::Base 'Mojolicious::Controller';
has result_set => sub {
my $c = shift;
return $c->schema->resultset('Transaction');
};
sub read {
my $c = shift;
my $id = $c->param('id');
if ( my $transaction = $c->result_set->find($id) ) {
$c->stash( transaction => $transaction );
} else {
$c->flash( error => 'No transaction found' );
$c->redirect_to( '/admin/transactions' );
}
}
sub image {
my $c = shift;
my $id = $c->param('id');
my $transaction = $c->result_set->find($id);
if ( $transaction->proof_image ) {
$c->reply->asset($c->get_file_from_uuid($transaction->proof_image));
} else {
$c->reply->static('image/no_transaction.jpg');
}
}
sub delete {
my $c = shift;
my $id = $c->param('id');
if ( my $transaction = $c->result_set->find($id) ) {
if (defined $transaction->category) {
$transaction->category->delete;
}
$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;