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

(-)a/cataloguing/additem.pl (-2 / +11 lines)
Lines 170-176 sub generate_subfield_form { Link Here
170
            my @authorised_values;
170
            my @authorised_values;
171
            my %authorised_lib;
171
            my %authorised_lib;
172
            # builds list, depending on authorised value...
172
            # builds list, depending on authorised value...
173
            if ( $subfieldlib->{authorised_value} eq "branches" ) {
173
            if ( $subfieldlib->{authorised_value} eq "LOST" ) {
174
                  my $ClaimReturnedLostValue = C4::Context->preference('ClaimReturnedLostValue');
175
                  push @authorised_values, qq{};
176
                  my $av = GetAuthorisedValues( $subfieldlib->{authorised_value} );
177
                  for my $r ( @$av ) {
178
                      next if $ClaimReturnedLostValue && $r->{authorised_value} eq $ClaimReturnedLostValue;
179
                      push @authorised_values, $r->{authorised_value};
180
                      $authorised_lib{$r->{authorised_value}} = $r->{lib};
181
                  }
182
            }
183
            elsif ( $subfieldlib->{authorised_value} eq "branches" ) {
174
                foreach my $thisbranch (@$branches) {
184
                foreach my $thisbranch (@$branches) {
175
                    push @authorised_values, $thisbranch->{branchcode};
185
                    push @authorised_values, $thisbranch->{branchcode};
176
                    $authorised_lib{$thisbranch->{branchcode}} = $thisbranch->{branchname};
186
                    $authorised_lib{$thisbranch->{branchcode}} = $thisbranch->{branchname};
177
- 

Return to bug 24279