View | Details | Raw Unified | Return to bug 30909
Collapse All | Expand All

(-)a/cataloguing/additem.pl (-3 / +9 lines)
Lines 208-215 if ($op eq "additem") { Link Here
208
            my @v = grep { $_ ne "" }
208
            my @v = grep { $_ ne "" }
209
                uniq $input->multi_param( "items." . $c );
209
                uniq $input->multi_param( "items." . $c );
210
210
211
            next if !@v
211
            next unless @v;
212
                && $c ne 'permanent_location'; # See 27837
212
213
            if ( $c eq 'permanent_location' ) { # See 27837
214
                $item->make_column_dirty('permanent_location');
215
            }
213
216
214
            $item->$c(join ' | ', @v);
217
            $item->$c(join ' | ', @v);
215
        }
218
        }
Lines 477-482 if ($op eq "additem") { Link Here
477
            my @v = map { ( defined $_ && $_ eq '' ) ? undef : $_ } $input->multi_param( "items." . $c );
480
            my @v = map { ( defined $_ && $_ eq '' ) ? undef : $_ } $input->multi_param( "items." . $c );
478
            next unless @v;
481
            next unless @v;
479
482
483
            if ( $c eq 'permanent_location' ) { # See 27837
484
                $item->make_column_dirty('permanent_location');
485
            }
486
480
            if ( scalar(@v) == 1 && not defined $v[0] ) {
487
            if ( scalar(@v) == 1 && not defined $v[0] ) {
481
                delete $new_values->{$c};
488
                delete $new_values->{$c};
482
            } else {
489
            } else {
483
- 

Return to bug 30909