X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?p=catagits%2FCatalyst-Controller-DBIC-API.git;a=blobdiff_plain;f=t%2Frpc%2Fupdate.t;h=80d12d1b37bcd0680519676d1a53b10a60df0db3;hp=dc68881474b861045b74b92105a9e95c8757dc99;hb=0b8c73709f05b08590cf9fc8b0941089083539f7;hpb=a1f7106409eb2d3c49aa9cb2c631464c14e911c4 diff --git a/t/rpc/update.t b/t/rpc/update.t index dc68881..80d12d1 100644 --- a/t/rpc/update.t +++ b/t/rpc/update.t @@ -23,6 +23,7 @@ my %original_cols = $track->get_columns; my $track_update_url = "$base/api/rpc/track/id/" . $track->id . "/update"; my $any_track_update_url = "$base/api/rpc/any/track/id/" . $track->id . "/update"; +my $tracks_update_url = "$base/api/rpc/track/update"; # test invalid track id caught { @@ -130,4 +131,19 @@ my $any_track_update_url = "$base/api/rpc/any/track/id/" . $track->id . "/update is($track->get_column('position'), '14', 'Position changed'); } +{ + # order to get a stable order of rows + my $tracks_rs = $schema->resultset('Track')->search(undef, { order_by => 'trackid', rows => 3 }); + my $test_data = JSON::Any->Dump({ list => [map +{ id => $_->id, title => 'Track ' . $_->id }, $tracks_rs->all] }); + my $req = POST( $tracks_update_url, Content => $test_data ); + $req->content_type('text/x-json'); + $mech->request($req); + cmp_ok( $mech->status, '==', 200, 'Attempt to update three tracks ok' ); + + $tracks_rs->reset; + while (my $track = $tracks_rs->next) { + is($track->title, 'Track ' . $track->id, 'Title changed'); + } +} + done_testing();