View | Details | Raw Unified | Return to bug 16868
Collapse All | Expand All

(-)a/t/db_dependent/Linker_FirstMatch.t (-2 / +9 lines)
Lines 18-24 BEGIN { Link Here
18
}
18
}
19
my $dbh = C4::Context->dbh;
19
my $dbh = C4::Context->dbh;
20
20
21
my $query = "SELECT authid, marc FROM auth_header LIMIT 1;";
21
my $where_clause = ' WHERE marcxml LIKE \'%datafield tag="';
22
if (C4::Context->preference('MARCFlavour') eq 'UNIMARC') {
23
    $where_clause .= '2%\'';
24
} else {
25
    $where_clause .= '1%\'';
26
}
27
28
my $query = "SELECT authid, marc FROM auth_header ";
29
$query .= $where_clause;
22
my $sth = $dbh->prepare($query);
30
my $sth = $dbh->prepare($query);
23
$sth->execute();
31
$sth->execute();
24
my ($authid, $marc) = $sth->fetchrow_array();
32
my ($authid, $marc) = $sth->fetchrow_array();
25
- 

Return to bug 16868