# Not sure if these returns should not be exceptions...
my $content_type = $self->content_type || return;
- return unless ($self->method eq 'POST' || $self->method eq 'PUT');
+ return unless ($self->method eq 'POST' || $self->method eq 'PUT' || $self->method eq 'PATCH');
my ($match) = grep { $content_type =~/$_/i }
keys(%{$self->data_handlers});
Catalyst::Exception->throw(
sprintf '%s does not have an available data handler. Valid data_handlers are %s.',
$content_type, join ', ', sort keys %{$self->data_handlers}
- );
+ );
}
}