=cut
-sub base : Chained('setup') PathPart('') ActionClass('REST') Args {
- my ( $self, $c ) = @_;
-
-}
+sub base : Chained('setup') PathPart('') ActionClass('REST') Args {}
sub base_PUT {
my ( $self, $c ) = @_;
sub base_DELETE {
my ( $self, $c ) = @_;
- $DB::single =1;
$c->forward('object');
return if $self->get_errors($c);
$c->forward('delete');