|
Lines 452-458
sub select_all_authorities {
Link Here
|
| 452 |
|
452 |
|
| 453 |
sub select_all_biblios { |
453 |
sub select_all_biblios { |
| 454 |
$table = 'biblioitems' |
454 |
$table = 'biblioitems' |
| 455 |
if grep { /^$table$/ } @tables_allowed_for_select; |
455 |
unless grep { /^$table$/ } @tables_allowed_for_select; |
| 456 |
my $strsth = qq{ SELECT biblionumber FROM $table }; |
456 |
my $strsth = qq{ SELECT biblionumber FROM $table }; |
| 457 |
$strsth.=qq{ WHERE $where } if ($where); |
457 |
$strsth.=qq{ WHERE $where } if ($where); |
| 458 |
$strsth.=qq{ LIMIT $length } if ($length && !$offset); |
458 |
$strsth.=qq{ LIMIT $length } if ($length && !$offset); |
| 459 |
- |
|
|