[Koha-devel] CVS: koha/acqui addorder.pl,1.2,1.3

[Gynn Lomax]

Update of /cvsroot/koha/koha/acqui
In directory usw-pr-cvs1:/tmp/cvs-serv23750/acqui

Modified Files:
	addorder.pl 
Log Message:
Acquisitions::newbiblioitem updated to be usable for new acqui.simple
addorder.pl and updatebibitem.pl modified to use new newbiblioitem


Index: addorder.pl
===================================================================
RCS file: /cvsroot/koha/koha/acqui/addorder.pl,v
retrieving revision 1.2
retrieving revision 1.3
diff -C2 -r1.2 -r1.3
*** addorder.pl	10 Apr 2002 05:47:07 -0000	1.2
--- addorder.pl	15 Apr 2002 05:33:33 -0000	1.3
***************
*** 48,55 ****
    if ($existing eq 'no'){
      #if it doesnt create it
!     $bibnum=newbiblio({ title     => $title,
! 	                author    =>$author,
! 	                copyright => $copyright });
!     $bibitemnum=newbiblioitem($bibnum,$itemtype,$isbn);
      newsubtitle($bibnum);
      modbiblio($bibnum,$title,$author,$copyright,$series);
--- 48,57 ----
    if ($existing eq 'no'){
      #if it doesnt create it
!     $bibnum = &newbiblio({ title     => $title,
! 	                   author    =>$author,
! 	                   copyright => $copyright });
!     $bibitemnum = &newbiblioitem({ biblionumber => $bibnum,
!  	                           itemtype     => $itemtype,
! 	                           isben        => $isbn });
      newsubtitle($bibnum);
      modbiblio($bibnum,$title,$author,$copyright,$series);