|
Lines 19-25
Link Here
|
| 19 |
|
19 |
|
| 20 |
use Modern::Perl; |
20 |
use Modern::Perl; |
| 21 |
|
21 |
|
| 22 |
use Test::More tests => 5; |
22 |
use Test::More tests => 6; |
| 23 |
|
23 |
|
| 24 |
use Koha::NewsItem; |
24 |
use Koha::NewsItem; |
| 25 |
use Koha::News; |
25 |
use Koha::News; |
|
Lines 54-58
is( $retrieved_news_item_1->content, $new_news_item_1->content, 'The content met
Link Here
|
| 54 |
$retrieved_news_item_1->delete; |
54 |
$retrieved_news_item_1->delete; |
| 55 |
is( Koha::News->search->count, $nb_of_news + 1, 'Delete should have deleted the news_item' ); |
55 |
is( Koha::News->search->count, $nb_of_news + 1, 'Delete should have deleted the news_item' ); |
| 56 |
|
56 |
|
|
|
57 |
subtest '->author' => sub { |
| 58 |
plan tests => 1; |
| 59 |
|
| 60 |
my $news_item = $builder->build_object({ class => 'Koha::News' }); |
| 61 |
is( ref($news_item->author), 'Koha::Patron', 'Koha::NewsItem->author returns a Koha::Patron object' ); |
| 62 |
}; |
| 63 |
|
| 57 |
$schema->storage->txn_rollback; |
64 |
$schema->storage->txn_rollback; |
| 58 |
|
65 |
|
| 59 |
- |
|
|