[Koha-cvs] CVS: koha/admin checkmarc.pl,1.5,1.5.2.1
MJ Ray
slef at users.sourceforge.net
Fri Dec 19 03:16:06 CET 2003
Update of /cvsroot/koha/koha/admin
In directory sc8-pr-cvs1:/tmp/cvs-serv4537/admin
Modified Files:
Tag: rel_2_0
checkmarc.pl
Log Message:
DBI call fix for bug 662
Index: checkmarc.pl
===================================================================
RCS file: /cvsroot/koha/koha/admin/checkmarc.pl,v
retrieving revision 1.5
retrieving revision 1.5.2.1
diff -C2 -r1.5 -r1.5.2.1
*** checkmarc.pl 4 Sep 2003 15:03:00 -0000 1.5
--- checkmarc.pl 19 Dec 2003 02:16:04 -0000 1.5.2.1
***************
*** 83,88 ****
}
}
! $sth = $dbh->prepare("select kohafield from marc_subfield_structure where tagfield=$tagfield");
! $sth->execute;
while (($res2) = $sth->fetchrow) {
if (!$res2 || $res2 =~ /^items/) {
--- 83,88 ----
}
}
! $sth = $dbh->prepare("select kohafield from marc_subfield_structure where tagfield=?");
! $sth->execute($tagfield);
while (($res2) = $sth->fetchrow) {
if (!$res2 || $res2 =~ /^items/) {
More information about the Koha-cvs
mailing list