subtest 'Find a show' => sub {
ok( $eztv->has_shows, 'Can fetch shows list' );
- ok( $show = $eztv->find_show(sub{ $_->name =~ /Walking dead/i }), 'Find a known show' );
- is( $show->name, 'The Walking Dead', 'Name looks good' );
+ ok( $show = $eztv->find_show(sub{ $_->name =~ /Doctor who/i }), 'Find a known show' );
+ is( $show->name, 'Doctor Who', 'Name looks good' );
ok( $show->url, 'Has url ' . $show->url );
ok( $show->status, 'Has status ' . $show->status );
};
subtest 'Find episodes' => sub {
ok( $show->has_episodes, 'Show fetch show episodes' );
- ok( my $ep = $show->find_episode(sub{ $_->season == 3 && $_->number == 8 && $_->quality eq 'standard' }), 'Find a known episode' );
+ ok( my $ep = $show->find_episode(sub{ $_->season == 9 && $_->number == 9 && $_->quality eq 'standard' }), 'Find a known episode' );
diag( 'Title: ' . $ep->title );
diag( 'Version: ' . $ep->version );
diag( 'Size: ' . $ep->size );
- is( $ep->name, 'The Walking Dead', 'Name looks good' );
+ is( $ep->name, 'Doctor Who 2005', 'Name looks good' );
ok( $ep->has_links, 'Episode has links' );
ok( my $link = $ep->find_link(sub{ $_->type eq 'torrent' }), 'Find a torrent link' );