@@ -, +, @@ WorldCat (via OCLC number) --- opac/opac-ISBDdetail.pl | 3 +++ opac/opac-MARCdetail.pl | 3 +++ opac/opac-detail.pl | 3 +++ 3 files changed, 9 insertions(+) --- a/opac/opac-ISBDdetail.pl +++ a/opac/opac-ISBDdetail.pl @@ -201,6 +201,8 @@ my $issn = $marcissns->[0] || ''; if (my $search_for_title = C4::Context->preference('OPACSearchForTitleIn')){ $dat->{title} =~ s/\/+$//; # remove trailing slash $dat->{title} =~ s/\s+$//; # remove trailing space + my $oclc_no = $record->subfield('035','a') // q{}; + $oclc_no =~ s/\([^)]*\)//; $search_for_title = parametrized_url( $search_for_title, { @@ -210,6 +212,7 @@ if (my $search_for_title = C4::Context->preference('OPACSearchForTitleIn')){ ISSN => $issn, CONTROLNUMBER => $marccontrolnumber, BIBLIONUMBER => $biblionumber, + OCLC_NO => $oclc_no, } ); $template->param('OPACSearchForTitleIn' => $search_for_title); --- a/opac/opac-MARCdetail.pl +++ a/opac/opac-MARCdetail.pl @@ -352,6 +352,8 @@ my $issn = $marcissns->[0] || ''; if (my $search_for_title = C4::Context->preference('OPACSearchForTitleIn')){ $dat->{title} =~ s/\/+$//; # remove trailing slash $dat->{title} =~ s/\s+$//; # remove trailing space + my $oclc_no = $record->subfield('035','a') // q{}; + $oclc_no =~ s/\([^)]*\)//; $search_for_title = parametrized_url( $search_for_title, { @@ -361,6 +363,7 @@ if (my $search_for_title = C4::Context->preference('OPACSearchForTitleIn')){ ISSN => $issn, CONTROLNUMBER => $marccontrolnumber, BIBLIONUMBER => $biblionumber, + OCLC_NO => $oclc_no, } ); $template->param('OPACSearchForTitleIn' => $search_for_title); --- a/opac/opac-detail.pl +++ a/opac/opac-detail.pl @@ -1186,6 +1186,8 @@ my $issn = $marcissns->[0] || ''; if (my $search_for_title = C4::Context->preference('OPACSearchForTitleIn')){ $dat->{title} =~ s/\/+$//; # remove trailing slash $dat->{title} =~ s/\s+$//; # remove trailing space + my $oclc_no = $record->subfield('035','a') // q{}; + $oclc_no =~ s/\([^)]*\)//; $search_for_title = parametrized_url( $search_for_title, { @@ -1195,6 +1197,7 @@ if (my $search_for_title = C4::Context->preference('OPACSearchForTitleIn')){ ISSN => $issn, CONTROLNUMBER => $marccontrolnumber, BIBLIONUMBER => $biblionumber, + OCLC_NO => $oclc_no, } ); $template->param('OPACSearchForTitleIn' => $search_for_title); --