|
Lines 1681-1687
sub searchResults {
Link Here
|
| 1681 |
while ( ( my $column ) = $sth2->fetchrow ) { |
1681 |
while ( ( my $column ) = $sth2->fetchrow ) { |
| 1682 |
my ( $tagfield, $tagsubfield ) = |
1682 |
my ( $tagfield, $tagsubfield ) = |
| 1683 |
&GetMarcFromKohaField( "items." . $column, "" ); |
1683 |
&GetMarcFromKohaField( "items." . $column, "" ); |
| 1684 |
$subfieldstosearch{$column} = $tagsubfield; |
1684 |
if ( defined $tagsubfield ) { |
|
|
1685 |
$subfieldstosearch{$column} = $tagsubfield; |
| 1686 |
} |
| 1685 |
} |
1687 |
} |
| 1686 |
|
1688 |
|
| 1687 |
# handle which records to actually retrieve |
1689 |
# handle which records to actually retrieve |
| 1688 |
- |
|
|