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

(-)a/C4/AuthoritiesMarc.pm (-5 / +5 lines)
Lines 169-186 sub SearchAuthorities { Link Here
169
                $attr = " \@attr 1=Any ";
169
                $attr = " \@attr 1=Any ";
170
            }
170
            }
171
171
172
            if ( @$operator[$i] eq 'is' ) {
172
            my $operator = @$operator[$i];
173
            if ( $operator and $operator eq 'is' ) {
173
                $attr .= " \@attr 4=1  \@attr 5=100 "
174
                $attr .= " \@attr 4=1  \@attr 5=100 "
174
                  ;    ##Phrase, No truncation,all of subfield field must match
175
                  ;    ##Phrase, No truncation,all of subfield field must match
175
            }
176
            }
176
            elsif ( @$operator[$i] eq "=" ) {
177
            elsif ( $operator and $operator eq "=" ) {
177
                $attr .= " \@attr 4=107 ";    #Number Exact match
178
                $attr .= " \@attr 4=107 ";    #Number Exact match
178
            }
179
            }
179
            elsif ( @$operator[$i] eq "start" ) {
180
            elsif ( $operator and $operator eq "start" ) {
180
                $attr .= " \@attr 3=2 \@attr 4=1 \@attr 5=1 "
181
                $attr .= " \@attr 3=2 \@attr 4=1 \@attr 5=1 "
181
                  ;    #Firstinfield Phrase, Right truncated
182
                  ;    #Firstinfield Phrase, Right truncated
182
            }
183
            }
183
            elsif ( @$operator[$i] eq "exact" ) {
184
            elsif ( $operator and $operator eq "exact" ) {
184
                $attr .= " \@attr 4=1  \@attr 5=100 \@attr 6=3 "
185
                $attr .= " \@attr 4=1  \@attr 5=100 \@attr 6=3 "
185
                  ;    ##Phrase, No truncation,all of subfield field must match
186
                  ;    ##Phrase, No truncation,all of subfield field must match
186
            }
187
            }
187
- 

Return to bug 12861