Lines 104-120
if ($op eq 'add_form') {
Link Here
|
104 |
my $duplicate_entry = 0; |
104 |
my $duplicate_entry = 0; |
105 |
my @branches = grep { $_ ne q{} } $input->multi_param('branches'); |
105 |
my @branches = grep { $_ ne q{} } $input->multi_param('branches'); |
106 |
|
106 |
|
107 |
my $already_exists = Koha::AuthorisedValues->search( |
107 |
if ( $new_category eq 'branches' or $new_category eq 'itemtypes' or $new_category eq 'cn_source' ) { |
108 |
{ |
|
|
109 |
category => $new_category, |
110 |
authorised_value => $new_authorised_value, |
111 |
} |
112 |
)->next; |
113 |
|
114 |
if ( $already_exists and ( not $id or $already_exists->id != $id ) ) { |
115 |
push @messages, {type => 'error', code => 'already_exists' }; |
116 |
} |
117 |
elsif ( $new_category eq 'branches' or $new_category eq 'itemtypes' or $new_category eq 'cn_source' ) { |
118 |
push @messages, {type => 'error', code => 'invalid_category_name' }; |
108 |
push @messages, {type => 'error', code => 'invalid_category_name' }; |
119 |
} |
109 |
} |
120 |
elsif ( $id ) { # Update |
110 |
elsif ( $id ) { # Update |
Lines 136-152
if ($op eq 'add_form') {
Link Here
|
136 |
} |
126 |
} |
137 |
} |
127 |
} |
138 |
else { # Insert |
128 |
else { # Insert |
139 |
my $av = Koha::AuthorisedValue->new( { |
|
|
140 |
category => $new_category, |
141 |
authorised_value => $new_authorised_value, |
142 |
lib => scalar $input->param('lib') || undef, |
143 |
lib_opac => scalar $input->param('lib_opac') || undef, |
144 |
imageurl => $imageurl, |
145 |
} ); |
146 |
|
147 |
eval { |
129 |
eval { |
148 |
$av->store; |
130 |
my $av = Koha::AuthorisedValue->new( |
|
|
131 |
{ |
132 |
category => $new_category, |
133 |
authorised_value => $new_authorised_value, |
134 |
lib => scalar $input->param('lib') || undef, |
135 |
lib_opac => scalar $input->param('lib_opac') || undef, |
136 |
imageurl => $imageurl, |
137 |
} |
138 |
)->store; |
149 |
$av->replace_library_limits( \@branches ); |
139 |
$av->replace_library_limits( \@branches ); |
|
|
140 |
$av->store; |
150 |
}; |
141 |
}; |
151 |
|
142 |
|
152 |
if ( $@ ) { |
143 |
if ( $@ ) { |