Lines 6-19
use Test::More tests => 14;
Link Here
|
6 |
use C4::Context; |
6 |
use C4::Context; |
7 |
use Koha::AuthorisedValue; |
7 |
use Koha::AuthorisedValue; |
8 |
use Koha::AuthorisedValues; |
8 |
use Koha::AuthorisedValues; |
|
|
9 |
use Koha::AuthorisedValueCategories; |
9 |
|
10 |
|
10 |
my $dbh = C4::Context->dbh; |
11 |
my $dbh = C4::Context->dbh; |
11 |
$dbh->{AutoCommit} = 0; |
12 |
$dbh->{AutoCommit} = 0; |
12 |
$dbh->{RaiseError} = 1; |
13 |
$dbh->{RaiseError} = 1; |
13 |
|
14 |
|
14 |
$dbh->do("DELETE FROM authorised_values"); |
15 |
$dbh->do("DELETE FROM authorised_values"); |
|
|
16 |
$dbh->do("DELETE FROM authorised_value_categories"); |
15 |
|
17 |
|
16 |
# insert |
18 |
# insert |
|
|
19 |
Koha::AuthorisedValueCategory->new({ category_name => 'av_for_testing' })->store; |
20 |
Koha::AuthorisedValueCategory->new({ category_name => 'aaav_for_testing' })->store; |
17 |
my $av1 = Koha::AuthorisedValue->new( |
21 |
my $av1 = Koha::AuthorisedValue->new( |
18 |
{ |
22 |
{ |
19 |
category => 'av_for_testing', |
23 |
category => 'av_for_testing', |
20 |
- |
|
|