diff --git a/lib/Dancer2/Serializer/JsonApi.pm b/lib/Dancer2/Serializer/JsonApi.pm
index cbe4c6d..074b7cd 100644
--- a/lib/Dancer2/Serializer/JsonApi.pm
+++ b/lib/Dancer2/Serializer/JsonApi.pm
@@ -25,7 +25,7 @@ sub serialize {
     my ( $self, $data ) = @_;
 
     return $self->json_serializer->serialize(
-        $self->registry->serialize(%$data) );
+        $self->registry->serialize(@$data) );
 }
 
 sub deserialize { ... }
diff --git a/t/merge-ready/perltidy.t b/t/merge-ready/perltidy.t
new file mode 100644
index 0000000..f2cad2f
--- /dev/null
+++ b/t/merge-ready/perltidy.t
@@ -0,0 +1,23 @@
+use 5.32.0;
+
+use Test2::V0;
+
+use Git::Wrapper;
+use Test::PerlTidy qw( run_tests );
+
+my $target_branch = $ENV{TARGET_BRANCH} // 'main';
+
+my $git = Git::Wrapper->new('.');
+
+my $on_target = grep { "* $target_branch" eq $_ } $git->branch;
+
+if ($on_target) {
+    run_tests();
+}
+else {
+    my @files =
+      $git->diff( { name_only => 1, diff_filter => 'ACMR' }, $target_branch );
+    ok Test::PerlTidy::is_file_tidy($_), $_ for @files;
+}
+
+done_testing;
diff --git a/t/serializer.t b/t/serializer.t
index 46311c7..a568767 100644
--- a/t/serializer.t
+++ b/t/serializer.t
@@ -6,7 +6,7 @@ use Dancer2::Serializer::JsonApi;
 my $serializer =
   Dancer2::Serializer::JsonApi->new( log_cb => sub { warn @_ } );
 
-my $data = { 'thing' =>, { id => 2 } };
+my $data = [ 'thing' => { id => 2 } ];
 
 my $serialized = $serializer->serialize($data);