Lines 65-70
use Koha::ItemTypes;
Link Here
|
65 |
use Koha::Patrons; |
65 |
use Koha::Patrons; |
66 |
use Koha::RecordProcessor; |
66 |
use Koha::RecordProcessor; |
67 |
use Koha::Biblios; |
67 |
use Koha::Biblios; |
|
|
68 |
use Koha::Util::MARC; |
68 |
|
69 |
|
69 |
my $query = CGI->new(); |
70 |
my $query = CGI->new(); |
70 |
my $biblionumber = $query->param('biblionumber'); |
71 |
my $biblionumber = $query->param('biblionumber'); |
Lines 201-208
my $issn = $marcissns->[0] || '';
Link Here
|
201 |
if (my $search_for_title = C4::Context->preference('OPACSearchForTitleIn')){ |
202 |
if (my $search_for_title = C4::Context->preference('OPACSearchForTitleIn')){ |
202 |
$dat->{title} =~ s/\/+$//; # remove trailing slash |
203 |
$dat->{title} =~ s/\/+$//; # remove trailing slash |
203 |
$dat->{title} =~ s/\s+$//; # remove trailing space |
204 |
$dat->{title} =~ s/\s+$//; # remove trailing space |
204 |
my $oclc_no = $record->subfield('035','a') // q{}; |
205 |
my $oclc_no = Koha::Util::MARC::oclc_number( $record ); |
205 |
$oclc_no =~ s/\([^)]*\)//; |
|
|
206 |
$search_for_title = parametrized_url( |
206 |
$search_for_title = parametrized_url( |
207 |
$search_for_title, |
207 |
$search_for_title, |
208 |
{ |
208 |
{ |