Lines 1700-1726
subtest 'list() tests' => sub {
Link Here
|
1700 |
DelBiblio( $biblio->id ); |
1700 |
DelBiblio( $biblio->id ); |
1701 |
DelBiblio( $biblio2->id ); |
1701 |
DelBiblio( $biblio2->id ); |
1702 |
|
1702 |
|
1703 |
$t->get_ok( "//$userid:$password@/api/v1/biblios/?deleted=1" => |
1703 |
$t->get_ok( "//$userid:$password@/api/v1/biblios/?deleted=1&q=$query" => |
1704 |
{ Accept => 'application/json', 'x-koha-query' => $search } ) |
1704 |
{ Accept => 'application/json' } ) |
1705 |
->status_is(200); |
1705 |
->status_is(200); |
1706 |
|
1706 |
|
1707 |
$result = $t->get_ok( "//$userid:$password@/api/v1/biblios/?deleted=1" => |
1707 |
$result = $t->get_ok( "//$userid:$password@/api/v1/biblios/?deleted=1&q=$query" => |
1708 |
{ Accept => 'application/marcxml+xml', 'x-koha-query' => $search } ) |
1708 |
{ Accept => 'application/marcxml+xml' } ) |
1709 |
->status_is(200)->tx->res->body; |
1709 |
->status_is(200)->tx->res->body; |
1710 |
|
1710 |
|
1711 |
$encoded_title = Encode::encode( "UTF-8", $title_with_diacritics ); |
1711 |
$encoded_title = Encode::encode( "UTF-8", $title_with_diacritics ); |
1712 |
like( $result, qr/\Q$encoded_title/, "The title is not double encoded" ); |
1712 |
like( $result, qr/\Q$encoded_title/, "The title is not double encoded" ); |
1713 |
|
1713 |
|
1714 |
$t->get_ok( "//$userid:$password@/api/v1/biblios/?deleted=1" => |
1714 |
$t->get_ok( "//$userid:$password@/api/v1/biblios/?deleted=1&q=$query" => |
1715 |
{ Accept => 'application/marc-in-json', 'x-koha-query' => $search } ) |
1715 |
{ Accept => 'application/marc-in-json' } ) |
1716 |
->status_is(200); |
1716 |
->status_is(200); |
1717 |
|
1717 |
|
1718 |
$t->get_ok( "//$userid:$password@/api/v1/biblios/?deleted=1" => |
1718 |
$t->get_ok( "//$userid:$password@/api/v1/biblios/?deleted=1&q=$query" => |
1719 |
{ Accept => 'application/marc', 'x-koha-query' => $search } ) |
1719 |
{ Accept => 'application/marc' } ) |
1720 |
->status_is(200); |
1720 |
->status_is(200); |
1721 |
|
1721 |
|
1722 |
$t->get_ok( "//$userid:$password@/api/v1/biblios/?deleted=1" => |
1722 |
$t->get_ok( "//$userid:$password@/api/v1/biblios/?deleted=1&q=$query" => |
1723 |
{ Accept => 'text/plain', 'x-koha-query' => $search } ) |
1723 |
{ Accept => 'text/plain' } ) |
1724 |
->status_is(200); |
1724 |
->status_is(200); |
1725 |
|
1725 |
|
1726 |
|
1726 |
|
1727 |
- |
|
|