|
Lines 307-330
sub plugin {
Link Here
|
| 307 |
if ( $marcrecord->field('010') ) { |
307 |
if ( $marcrecord->field('010') ) { |
| 308 |
$subfield_value_y = $marcrecord->field('010')->subfield("a"); |
308 |
$subfield_value_y = $marcrecord->field('010')->subfield("a"); |
| 309 |
} |
309 |
} |
| 310 |
# escape the 's |
|
|
| 311 |
$subfield_value_9 =~ s/'/\\'/g; |
| 312 |
$subfield_value_0 =~ s/'/\\'/g; |
| 313 |
$subfield_value_a =~ s/'/\\'/g; |
| 314 |
$subfield_value_c =~ s/'/\\'/g; |
| 315 |
$subfield_value_d =~ s/'/\\'/g; |
| 316 |
$subfield_value_e =~ s/'/\\'/g; |
| 317 |
$subfield_value_h =~ s/'/\\'/g; |
| 318 |
$subfield_value_i =~ s/'/\\'/g; |
| 319 |
$subfield_value_l =~ s/'/\\'/g; |
| 320 |
$subfield_value_n =~ s/'/\\'/g; |
| 321 |
$subfield_value_o =~ s/'/\\'/g; |
| 322 |
$subfield_value_p =~ s/'/\\'/g; |
| 323 |
$subfield_value_t =~ s/'/\\'/g; |
| 324 |
$subfield_value_u =~ s/'/\\'/g; |
| 325 |
$subfield_value_v =~ s/'/\\'/g; |
| 326 |
$subfield_value_x =~ s/'/\\'/g; |
| 327 |
$subfield_value_y =~ s/'/\\'/g; |
| 328 |
$template->param( |
310 |
$template->param( |
| 329 |
fillinput => 1, |
311 |
fillinput => 1, |
| 330 |
index => scalar $query->param('index') . "", |
312 |
index => scalar $query->param('index') . "", |
| 331 |
- |
|
|