|
Lines 177-184
if ($op eq "additem") {
Link Here
|
| 177 |
my @v = grep { $_ ne "" } |
177 |
my @v = grep { $_ ne "" } |
| 178 |
uniq $input->multi_param( "items." . $c ); |
178 |
uniq $input->multi_param( "items." . $c ); |
| 179 |
|
179 |
|
| 180 |
next if !@v |
180 |
next unless @v; |
| 181 |
&& $c ne 'permanent_location'; # See 27837 |
181 |
|
|
|
182 |
if ( $c eq 'permanent_location' ) { # See 27837 |
| 183 |
$item->make_column_dirty('permanent_location'); |
| 184 |
} |
| 182 |
|
185 |
|
| 183 |
$item->$c(join ' | ', @v); |
186 |
$item->$c(join ' | ', @v); |
| 184 |
} |
187 |
} |
|
Lines 444-449
if ($op eq "additem") {
Link Here
|
| 444 |
my @v = map { ( defined $_ && $_ eq '' ) ? undef : $_ } $input->multi_param( "items." . $c ); |
447 |
my @v = map { ( defined $_ && $_ eq '' ) ? undef : $_ } $input->multi_param( "items." . $c ); |
| 445 |
next unless @v; |
448 |
next unless @v; |
| 446 |
|
449 |
|
|
|
450 |
if ( $c eq 'permanent_location' ) { # See 27837 |
| 451 |
$item->make_column_dirty('permanent_location'); |
| 452 |
} |
| 453 |
|
| 447 |
if ( scalar(@v) == 1 && not defined $v[0] ) { |
454 |
if ( scalar(@v) == 1 && not defined $v[0] ) { |
| 448 |
delete $new_values->{$c}; |
455 |
delete $new_values->{$c}; |
| 449 |
} else { |
456 |
} else { |
| 450 |
- |
|
|