[Koha-cvs] CVS: koha/C4 Biblio.pm,1.1.2.6,1.1.2.7

[Steve Tonnesen]

Update of /cvsroot/koha/koha/C4
In directory sc8-pr-cvs1:/tmp/cvs-serv2505

Modified Files:
      Tag: rel-1-2
        Biblio.pm 
Log Message:
Deletes subtitle, subject, and additionalauthors info when a biblio is deleted.
This kind of defeats the purpose of backing up deleted biblios in the
deletedbiblios table, but having the subjects appear in the next item added is
probably not a good idea.


Index: Biblio.pm
===================================================================
RCS file: /cvsroot/koha/koha/C4/Biblio.pm,v
retrieving revision 1.1.2.6
retrieving revision 1.1.2.7
diff -C2 -r1.1.2.6 -r1.1.2.7
*** Biblio.pm   15 Jan 2003 21:37:19 -0000      1.1.2.6
--- Biblio.pm   23 Jan 2003 22:38:15 -0000      1.1.2.7
***************
*** 623,626 ****
--- 623,635 ----
      $sth=$dbh->prepare($query);
      $sth->execute;
+     $query = "Delete from bibliosubtitle where biblionumber=$biblio";
+     $sth=$dbh->prepare($query);
+     $sth->execute;
+     $query = "Delete from bibliosubject where biblionumber=$biblio";
+     $sth=$dbh->prepare($query);
+     $sth->execute;
+     $query = "Delete from additionalauthors where biblionumber=$biblio";
+     $sth=$dbh->prepare($query);
+     $sth->execute;
      $sth->finish;
    }
***************
*** 1003,1006 ****
--- 1012,1021 ----
  #---------------------------------------
  # $Log$
+ # Revision 1.1.2.7  2003/01/23 22:38:15  tonnesen
+ # Deletes subtitle, subject, and additionalauthors info when a biblio is 
deleted.
+ # This kind of defeats the purpose of backing up deleted biblios in the
+ # deletedbiblios table, but having the subjects appear in the next item added 
is
+ # probably not a good idea.
+ #
  # Revision 1.1.2.6  2003/01/15 21:37:19  tonnesen
  # Fixes dangling biblioitems problem.  Will no longer allow you to delete a