[Koha-cvs] CVS: koha/acqui.simple additem.pl,1.19,1.20

[Paul POULAIN]

Update of /cvsroot/koha/koha/acqui.simple
In directory sc8-pr-cvs1:/tmp/cvs-serv1574/acqui.simple

Modified Files:
        additem.pl 
Log Message:
biblio & item deletion now works fine in MARC editor.
Stores deleted biblio/item in the marc field of the deletedbiblio/deleteditem 
table.

Index: additem.pl
===================================================================
RCS file: /cvsroot/koha/koha/acqui.simple/additem.pl,v
retrieving revision 1.19
retrieving revision 1.20
diff -C2 -r1.19 -r1.20
*** additem.pl  4 Sep 2003 13:08:17 -0000       1.19
--- additem.pl  24 Nov 2003 17:12:41 -0000      1.20
***************
*** 96,99 ****
--- 96,105 ----
        $nextop="saveitem";
  
#------------------------------------------------------------------------------------------------------------------------------
+ } elsif ($op eq "delitem") {
+ 
#------------------------------------------------------------------------------------------------------------------------------
+ # retrieve item if exist => then, it's a modif
+       &NEWdelitem($dbh,$bibid,$itemnum);
+       $nextop="additem";
+ 
#------------------------------------------------------------------------------------------------------------------------------
  } elsif ($op eq "saveitem") {
  
#------------------------------------------------------------------------------------------------------------------------------