Lines 122-130
if ($authid) {
Link Here
|
122 |
$indicator2 = defined $thes_mapping{$thes_008_11} ? $thes_mapping{$thes_008_11} : $thes_008_11; |
122 |
$indicator2 = defined $thes_mapping{$thes_008_11} ? $thes_mapping{$thes_008_11} : $thes_008_11; |
123 |
if ($indicator2 eq '7') { |
123 |
if ($indicator2 eq '7') { |
124 |
if ($thes_008_11 eq 'r') { |
124 |
if ($thes_008_11 eq 'r') { |
125 |
push @subfield_loop, { marc_subfield => '2', marc_values => ('aat') }; |
125 |
push @subfield_loop, { marc_subfield => '2', marc_values => [ 'aat' ] }; |
126 |
} elsif ($thes_008_11 eq 's') { |
126 |
} elsif ($thes_008_11 eq 's') { |
127 |
push @subfield_loop, { marc_subfield => '2', marc_values => ('sears') }; |
127 |
push @subfield_loop, { marc_subfield => '2', marc_values => [ 'sears' ] }; |
128 |
} |
128 |
} |
129 |
} |
129 |
} |
130 |
} |
130 |
} |
Lines 161-166
$template->param(
Link Here
|
161 |
SUBFIELD_LOOP => \@subfield_loop, |
161 |
SUBFIELD_LOOP => \@subfield_loop, |
162 |
tag_number => $tag_number, |
162 |
tag_number => $tag_number, |
163 |
); |
163 |
); |
|
|
164 |
require Data::Dumper; warn Data::Dumper::Dumper(@subfield_loop); |
164 |
|
165 |
|
165 |
output_html_with_http_headers $query, $cookie, $template->output; |
166 |
output_html_with_http_headers $query, $cookie, $template->output; |
166 |
|
167 |
|
167 |
- |
|
|