my $itemtype = 'UT_DVD';
my $frameworkcode = 'UTFW'; # frameworkcode is only 4 characters max!
my $branchcode = 'UT_BC';
+my $categoryname = 'Test';
our ($cleanup_needed);
SKIP: {
$driver->get($mainpage);
like( $driver->get_title(), qr(Log in to Koha), );
$s->auth;
-
{ # Item types
# Navigate to the Administration area and create an item type
$s->click( { href => '/admin/admin-home.pl', main => 'doc3' } )
); # Delete
};
+ { #Authorized values
+ $driver->get($mainpage);
+ $s->click( { href => '/admin/admin-home.pl', main => 'doc3' } ); #Koha administration
+
+ $s->click( { href => '/admin/authorised_values.pl', main => 'doc' } ); #Authorized values
+
+ $s->click( { href => '/cgi-bin/koha/admin/authorised_values.pl?op=add_form&category=Adult', main => 'doc3' } ); # New category
+ $s->fill_form( { authorised_value => 'Hardover', lib => 'Hardcover book'} );
+ $s->submit_form;
+
+ $s->click(
+ {
+ href => '/cgi-bin/koha/admin/authorised_values.pl?op=delete&searchfield=Adult&id=400',
+ main => 'doc3'
+ }
+ );
+ };
+
+ { #Patron categories
+ $driver->get($mainpage);
+ $s->click( { href => '/cgi-bin/koha/admin/categories.pl', main => 'doc3' } ); #Koha administration
+ $s->click( { href => '/cgi-bin/koha/admin/categories.pl?op=add_form', main => 'doc' } ); #New patron category
+
+ $s->fill_form( { categorycode => 'Test', description => 'Test category', enrolmentperiod => 12, category_type => 'Adult' } );
+ $s->submit_form;
+
+ $s->click(
+ {
+ href => '/cgi-bin/koha/admin/categories.pl?op=delete_confirm&categorycode=TEST',
+ main => 'doc3'
+ }
+ );
+ };
+
$driver->quit();
}