view release on metacpan or  search on metacpan

t/lib/Test/App/MP4Meta/Source/TVDB.pm  view on Meta::CPAN

    $self->{tvdb} = $tvdb;
}

sub name : Test(1) {
    my $self = shift;
    my $t    = $self->{tvdb};

    is( $t->name, 'theTVDB.com' );
}

sub get_tv_episode_not_found : Test(1) {
    my $self = shift;
    my $t    = App::MP4Meta::Source::TVDB->new();

    my $mock = Test::MockObject->new();
    $mock->set_always( 'search', [] );
    $t->{tvdb} = $mock;

    throws_ok {
        $t->get_tv_episode(
            { show_title => 'foo', season => 1, episode => 2 } );