View | Details | Raw Unified | Return to bug 12167
Collapse All | Expand All

(-)a/t/db_dependent/NewsChannels.t (-2 / +7 lines)
Lines 3-9 Link Here
3
use Modern::Perl;
3
use Modern::Perl;
4
use C4::Dates qw(format_date);
4
use C4::Dates qw(format_date);
5
use C4::Branch qw(GetBranchName);
5
use C4::Branch qw(GetBranchName);
6
use Test::More tests => 10;
6
use Test::More tests => 12;
7
7
8
BEGIN {
8
BEGIN {
9
    use_ok('C4::NewsChannels');
9
    use_ok('C4::NewsChannels');
Lines 133-138 ok( $opac_news_count >= 2, 'Successfully tested get_opac_news for LIB1!' ); Link Here
133
133
134
# Test GetNewsToDisplay
134
# Test GetNewsToDisplay
135
( $opac_news_count, $arrayref_opac_news ) = GetNewsToDisplay( q{}, 'LIB1' );
135
( $opac_news_count, $arrayref_opac_news ) = GetNewsToDisplay( q{}, 'LIB1' );
136
ok( !$arrayref_opac_news, 'Second parameter is ' .
137
                          ( defined($arrayref_opac_news) ?
138
                              ("Defined as '$arrayref_opac_news'") : "UNDEFINED")
139
  );
140
ok ( ref $opac_news_count eq 'ARRAY',
141
     '$opac_news_count is an array reference');
136
ok( $opac_news_count >= 2, 'Successfully tested GetNewsToDisplay for LIB1!' );
142
ok( $opac_news_count >= 2, 'Successfully tested GetNewsToDisplay for LIB1!' );
137
143
138
$dbh->rollback;
144
$dbh->rollback;
139
- 

Return to bug 12167