Lines 28-33
use POSIX;
Link Here
|
28 |
use URI::Escape; |
28 |
use URI::Escape; |
29 |
use Encode; |
29 |
use Encode; |
30 |
|
30 |
|
|
|
31 |
use Koha::AuthorisedValueCategories; |
32 |
|
31 |
my $testdir = File::Spec->rel2abs( dirname(__FILE__) ); |
33 |
my $testdir = File::Spec->rel2abs( dirname(__FILE__) ); |
32 |
|
34 |
|
33 |
my $koha_conf = $ENV{KOHA_CONF}; |
35 |
my $koha_conf = $ENV{KOHA_CONF}; |
Lines 135-140
if ($id_to_del) {
Link Here
|
135 |
ok($id_to_del ne undef, "error, link to delete not working"); |
137 |
ok($id_to_del ne undef, "error, link to delete not working"); |
136 |
} |
138 |
} |
137 |
|
139 |
|
|
|
140 |
Koha::AuthorisedValueCategories->find($category)->delete; # Clean up |
141 |
|
138 |
#---------------------------------------- Test with only latin utf-8 (could be taken as Latin-1/ISO 8859-1) |
142 |
#---------------------------------------- Test with only latin utf-8 (could be taken as Latin-1/ISO 8859-1) |
139 |
|
143 |
|
140 |
$category = 'tòmas'; |
144 |
$category = 'tòmas'; |
Lines 194-196
if ($id_to_del2) {
Link Here
|
194 |
ok($id_to_del2 ne undef, "error, link to delete not working"); |
198 |
ok($id_to_del2 ne undef, "error, link to delete not working"); |
195 |
} |
199 |
} |
196 |
|
200 |
|
197 |
- |
201 |
Koha::AuthorisedValueCategories->find($category)->delete; # Clean up |