Lines 39-45
use Koha::Biblio;
Link Here
|
39 |
use Koha::Biblioitem; |
39 |
use Koha::Biblioitem; |
40 |
use Koha::Item; |
40 |
use Koha::Item; |
41 |
use Koha::Hold; |
41 |
use Koha::Hold; |
42 |
use Koha::AdditionalContent; |
42 |
use Koha::AdditionalContents; |
43 |
use Koha::Serial; |
43 |
use Koha::Serial; |
44 |
use Koha::Subscription; |
44 |
use Koha::Subscription; |
45 |
use Koha::Suggestion; |
45 |
use Koha::Suggestion; |
Lines 631-646
EOF
Link Here
|
631 |
my $branchcode = $library->{branchcode}; |
631 |
my $branchcode = $library->{branchcode}; |
632 |
|
632 |
|
633 |
Koha::AdditionalContents->delete; |
633 |
Koha::AdditionalContents->delete; |
634 |
my $news_item = Koha::AdditionalContent->new( |
634 |
my $news_item = $builder->build_object( |
635 |
{ |
635 |
{ |
636 |
branchcode => $branchcode, |
636 |
class => 'Koha::AdditionalContents', |
637 |
title => "A wonderful news", |
637 |
value => { |
638 |
content => "This is the wonderful news.", |
638 |
category => 'news', |
639 |
lang => "slip", |
639 |
location => "slip", |
640 |
expiration_date => undef, |
640 |
branchcode => $branchcode, |
641 |
published_on => $one_minute_ago |
641 |
lang => 'default', |
|
|
642 |
title => "A wonderful news", |
643 |
content => "This is the wonderful news.", |
644 |
expiration_date => undef, |
645 |
published_on => $one_minute_ago |
646 |
} |
642 |
} |
647 |
} |
643 |
)->store; |
648 |
); |
644 |
|
649 |
|
645 |
# historic syntax |
650 |
# historic syntax |
646 |
my $template = <<EOF; |
651 |
my $template = <<EOF; |
647 |
- |
|
|