@@ -, +, @@ --- t/Koha/REST/Plugin/Pagination.t | 21 +++++++++++++++------ 1 file changed, 15 insertions(+), 6 deletions(-) --- a/t/Koha/REST/Plugin/Pagination.t +++ a/t/Koha/REST/Plugin/Pagination.t @@ -66,7 +66,7 @@ get '/pagination_headers_without_page_size' => sub { get '/pagination_headers_without_page' => sub { my $c = shift; - $c->add_pagination_headers({ total => 10, params => { _per_page => 4, firstname => 'Jonathan' } }); + $c->add_pagination_headers({ total => 10, params => { _per_page => 3, firstname => 'Jonathan' } }); $c->render( json => { ok => 1 }, status => 200 ); }; @@ -79,7 +79,7 @@ use t::lib::Mocks; subtest 'add_pagination_headers() tests' => sub { - plan tests => 64; + plan tests => 75; my $t = Test::Mojo->new; @@ -151,10 +151,19 @@ subtest 'add_pagination_headers() tests' => sub { $t->get_ok('/pagination_headers_without_page') ->status_is( 200 ) - ->header_is( 'X-Total-Count' => undef, 'X-Total-Count header absent' ) - ->header_is( 'Link' => undef, 'Link header absent' ); - - + ->header_is( 'X-Total-Count' => 10, 'X-Total-Count header present, even without page param' ) + ->header_unlike( 'Link' => qr/; rel="prev",/, 'First page, no previous' ) + ->header_unlike( 'Link' => qr/; rel="prev",/, 'First page, no previous' ) + ->header_unlike( 'Link' => qr/; rel="prev",/, 'First page, no previous' ) + ->header_like( 'Link' => qr/; rel="next",/ ) + ->header_like( 'Link' => qr/; rel="next",/ ) + ->header_like( 'Link' => qr/; rel="next",/ ) + ->header_like( 'Link' => qr/; rel="first",/ ) + ->header_like( 'Link' => qr/; rel="first",/ ) + ->header_like( 'Link' => qr/; rel="first",/ ) + ->header_like( 'Link' => qr/; rel="last"/ ) + ->header_like( 'Link' => qr/; rel="last"/ ) + ->header_like( 'Link' => qr/; rel="last"/ ); }; subtest 'dbic_merge_pagination() tests' => sub { --