|
Lines 1176-1182
sub BuildSummary {
Link Here
|
| 1176 |
$delimiter = " "; |
1176 |
$delimiter = " "; |
| 1177 |
} |
1177 |
} |
| 1178 |
|
1178 |
|
| 1179 |
my $heading = $field->as_string($subfields_to_report); |
1179 |
my $heading; |
|
|
1180 |
if ($subfields_to_report) { |
| 1181 |
$heading = $field->as_string($subfields_to_report); |
| 1182 |
} else { |
| 1183 |
$heading = $field->as_string(); |
| 1184 |
} |
| 1180 |
|
1185 |
|
| 1181 |
if ($subfields_to_subdivision) { |
1186 |
if ($subfields_to_subdivision) { |
| 1182 |
my $subheading = $field->as_string( $subfields_to_subdivision, $delimiter ); |
1187 |
my $subheading = $field->as_string( $subfields_to_subdivision, $delimiter ); |
|
Lines 1193-1199
sub BuildSummary {
Link Here
|
| 1193 |
}; |
1198 |
}; |
| 1194 |
} else { |
1199 |
} else { |
| 1195 |
push @equalterm, { |
1200 |
push @equalterm, { |
| 1196 |
heading => $field->as_string(), |
1201 |
heading => $heading, |
| 1197 |
hemain => ( $field->subfield('a') // undef ), |
1202 |
hemain => ( $field->subfield('a') // undef ), |
| 1198 |
field => $tag, |
1203 |
field => $tag, |
| 1199 |
}; |
1204 |
}; |
| 1200 |
- |
|
|