[Koha-cvs] CVS: koha/acqui.simple additem.pl,1.27.2.2,1.27.2.3

[Paul POULAIN]

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

Modified Files:
      Tag: rel_2_2
        additem.pl 
Log Message:
adding title & author in additem (owen suggestion)

Index: additem.pl
===================================================================
RCS file: /cvsroot/koha/koha/acqui.simple/additem.pl,v
retrieving revision 1.27.2.2
retrieving revision 1.27.2.3
diff -C2 -r1.27.2.2 -r1.27.2.3
*** additem.pl  25 Mar 2005 12:52:44 -0000      1.27.2.2
--- additem.pl  6 May 2005 08:26:28 -0000       1.27.2.3
***************
*** 61,64 ****
--- 61,65 ----
  my $tagslib = &MARCgettagslib($dbh,1,$itemtype);
  my $record = MARCgetbiblio($dbh,$bibid);
+ my $oldrecord = MARCmarc2koha($dbh,$record);
  my $itemrecord;
  my $nextop="additem";
***************
*** 280,283 ****
--- 281,286 ----
                                                bibid => $bibid,
                                                biblionumber =>$oldbiblionumber,
+                                               title => $oldrecord->{title},
+                                               author => $oldrecord->{author},
                                                item => address@hidden,
                                                itemnum => $itemnum,