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 |
- |
|
|