|
Lines 543-549
sub get_components_query {
Link Here
|
| 543 |
} |
543 |
} |
| 544 |
} |
544 |
} |
| 545 |
else { |
545 |
else { |
| 546 |
my $cleaned_title = $marc->title; |
546 |
my $cleaned_title = $marc->subfield('245', "a"); |
| 547 |
$cleaned_title =~ tr|/||; |
547 |
$cleaned_title =~ tr|/||; |
| 548 |
$cleaned_title = $builder->clean_search_term($cleaned_title); |
548 |
$cleaned_title = $builder->clean_search_term($cleaned_title); |
| 549 |
$searchstr = "Host-item:($cleaned_title)"; |
549 |
$searchstr = "Host-item:($cleaned_title)"; |
| 550 |
- |
|
|