DELETE
sub tasks_DELETE {
my ($self, $c) = @_;
my $id :Stashed;
my $task = $c->model('DBIC::Restricted::Tasks')->find($id);
$self->update_entity($c, $task,
sub { $task->delete }, sub { {result => 'ok'} });
}
| Catalyst | Maintainable web apps made easy! | #130 |
sub tasks_DELETE {
my ($self, $c) = @_;
my $id :Stashed;
my $task = $c->model('DBIC::Restricted::Tasks')->find($id);
$self->update_entity($c, $task,
sub { $task->delete }, sub { {result => 'ok'} });
}
| Copyright © 2007 Jonathan Rockway |