[Koha-cvs] CVS: koha/misc rebuildnonmarc.pl,1.4,1.4.2.1
Paul POULAIN
tipaul at users.sourceforge.net
Wed Feb 23 11:37:30 CET 2005
Update of /cvsroot/koha/koha/misc
In directory sc8-pr-cvs1.sourceforge.net:/tmp/cvs-serv11912/misc
Modified Files:
Tag: rel_2_2
rebuildnonmarc.pl
Log Message:
deleting subtitles before rebuilding the non-marc db
Index: rebuildnonmarc.pl
===================================================================
RCS file: /cvsroot/koha/koha/misc/rebuildnonmarc.pl,v
retrieving revision 1.4
retrieving revision 1.4.2.1
diff -C2 -r1.4 -r1.4.2.1
*** rebuildnonmarc.pl 23 Sep 2004 16:23:55 -0000 1.4
--- rebuildnonmarc.pl 23 Feb 2005 10:37:27 -0000 1.4.2.1
***************
*** 96,99 ****
--- 96,100 ----
my ($tagfield,$tagsubfield) = MARCfind_marc_from_kohafield($dbh,"additionalauthors.author",$frameworkcode);
my @addiauthfields = $record->field($tagfield);
+ $dbh->do("delete from bibliosubtitle where biblionumber=$oldbiblionumber");
foreach my $addiauthfield (@addiauthfields) {
my @addiauthsubfields = $addiauthfield->subfield($tagsubfield);
More information about the Koha-cvs
mailing list