Lines 78-85
elsif ( $op eq 'cud-add_validate' ) {
Link Here
|
78 |
my $min_password_length = $input->param('min_password_length'); |
78 |
my $min_password_length = $input->param('min_password_length'); |
79 |
my $require_strong_password = $input->param('require_strong_password'); |
79 |
my $require_strong_password = $input->param('require_strong_password'); |
80 |
my $noissuescharge = $input->param('noissuescharge') || undef; |
80 |
my $noissuescharge = $input->param('noissuescharge') || undef; |
81 |
my $noissueschargeguarantees = $input->param('noissueschargeguarantees') || undef; |
81 |
my $noissueschargeguarantees = $input->param('noissueschargeguarantees') || undef; |
82 |
my $noissueschargeguarantorswithguarantees = $input->param('noissueschargeguarantorswithguarantees') || undef; |
82 |
my $noissueschargeguarantorswithguarantees = $input->param('noissueschargeguarantorswithguarantees') || undef; |
|
|
83 |
my $enforce_expiry_notice = $input->param('enforce_expiry_notice'); |
83 |
|
84 |
|
84 |
my @branches = grep { $_ ne q{} } $input->multi_param('branches'); |
85 |
my @branches = grep { $_ ne q{} } $input->multi_param('branches'); |
85 |
my $can_be_guarantee = $input->param('can_be_guarantee'); |
86 |
my $can_be_guarantee = $input->param('can_be_guarantee'); |
Lines 121-126
elsif ( $op eq 'cud-add_validate' ) {
Link Here
|
121 |
$category->noissueschargeguarantees($noissueschargeguarantees); |
122 |
$category->noissueschargeguarantees($noissueschargeguarantees); |
122 |
$category->noissueschargeguarantorswithguarantees($noissueschargeguarantorswithguarantees); |
123 |
$category->noissueschargeguarantorswithguarantees($noissueschargeguarantorswithguarantees); |
123 |
$category->force_password_reset_when_set_by_staff($force_password_reset_when_set_by_staff); |
124 |
$category->force_password_reset_when_set_by_staff($force_password_reset_when_set_by_staff); |
|
|
125 |
$category->enforce_expiry_notice($enforce_expiry_notice); |
124 |
eval { |
126 |
eval { |
125 |
$category->store; |
127 |
$category->store; |
126 |
$category->replace_library_limits( \@branches ); |
128 |
$category->replace_library_limits( \@branches ); |
Lines 158-163
elsif ( $op eq 'cud-add_validate' ) {
Link Here
|
158 |
noissuescharge => $noissuescharge, |
160 |
noissuescharge => $noissuescharge, |
159 |
noissueschargeguarantees => $noissueschargeguarantees, |
161 |
noissueschargeguarantees => $noissueschargeguarantees, |
160 |
noissueschargeguarantorswithguarantees => $noissueschargeguarantorswithguarantees, |
162 |
noissueschargeguarantorswithguarantees => $noissueschargeguarantorswithguarantees, |
|
|
163 |
enforce_expiry_notice => $enforce_expiry_notice, |
161 |
force_password_reset_when_set_by_staff => $force_password_reset_when_set_by_staff, |
164 |
force_password_reset_when_set_by_staff => $force_password_reset_when_set_by_staff, |
162 |
} |
165 |
} |
163 |
); |
166 |
); |