Lines 193-201
sub _find_matching_requests {
Link Here
|
193 |
@existing_id_fields = grep { $_ eq 'pubmedid' } @existing_id_fields; |
193 |
@existing_id_fields = grep { $_ eq 'pubmedid' } @existing_id_fields; |
194 |
} |
194 |
} |
195 |
|
195 |
|
196 |
my $patron = Koha::Patrons->find( |
196 |
my $cardnumber = $self->{metadata}->{cardnumber} || ( C4::Context->userenv && C4::Context->userenv->{'cardnumber'} ); |
197 |
{ cardnumber => $self->{metadata}->{cardnumber} || C4::Context->userenv->{'cardnumber'} } ); |
197 |
return 0 unless $cardnumber; |
198 |
|
198 |
|
|
|
199 |
my $patron = Koha::Patrons->find( { cardnumber => $cardnumber} ); |
199 |
return 0 unless $patron; |
200 |
return 0 unless $patron; |
200 |
|
201 |
|
201 |
my $query; |
202 |
my $query; |
202 |
- |
|
|