|
Lines 604-610
my $results_hashref;
Link Here
|
| 604 |
my @coins; |
604 |
my @coins; |
| 605 |
|
605 |
|
| 606 |
if ($tag) { |
606 |
if ($tag) { |
| 607 |
$query_cgi = "tag=" .$tag . "&" . $query_cgi; |
607 |
$query_cgi = "tag=" . uri_escape_utf8( $tag ) . "&" . $query_cgi; |
| 608 |
my $taglist = get_tags({term=>$tag, approved=>1}); |
608 |
my $taglist = get_tags({term=>$tag, approved=>1}); |
| 609 |
$results_hashref->{biblioserver}->{hits} = scalar (@$taglist); |
609 |
$results_hashref->{biblioserver}->{hits} = scalar (@$taglist); |
| 610 |
my @marclist = map { C4::Biblio::GetXmlBiblio( $_->{biblionumber} ) } @$taglist; |
610 |
my @marclist = map { C4::Biblio::GetXmlBiblio( $_->{biblionumber} ) } @$taglist; |
| 611 |
- |
|
|