Lines 1138-1146
sub BuildSummary {
Link Here
|
1138 |
|
1138 |
|
1139 |
my $heading = $field->as_string($subfields_to_report); |
1139 |
my $heading = $field->as_string($subfields_to_report); |
1140 |
|
1140 |
|
1141 |
my $subheading = $field->as_string( $subfields_to_subdivision, $delimiter ); |
1141 |
if ($subfields_to_subdivision) { |
1142 |
if ( length $subheading > 0 ) { |
1142 |
my $subheading = $field->as_string( $subfields_to_subdivision, $delimiter ); |
1143 |
$heading .= $delimiter . $subheading; |
1143 |
if ( length $subheading > 0 ) { |
|
|
1144 |
$heading .= $delimiter . $subheading; |
1145 |
} |
1144 |
} |
1146 |
} |
1145 |
|
1147 |
|
1146 |
if ($subfields_to_report) { |
1148 |
if ($subfields_to_report) { |
1147 |
- |
|
|