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

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

Return to bug 24279