[Koha-cvs] CVS: koha/misc rebuildnonmarc.pl,1.4,1.4.2.1

[Paul POULAIN]

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);