[Koha-cvs] CVS: koha/C4 Biblio.pm,1.78,1.78.2.1

[Paul POULAIN]

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

Modified Files:
      Tag: rel_2_0
        Biblio.pm 
Log Message:
* minor html fixes
* adding publisher in acquisition process (& ordering basket by publisher)

Index: Biblio.pm
===================================================================
RCS file: /cvsroot/koha/koha/C4/Biblio.pm,v
retrieving revision 1.78
retrieving revision 1.78.2.1
diff -C2 -r1.78 -r1.78.2.1
*** Biblio.pm   9 Dec 2003 15:57:28 -0000       1.78
--- Biblio.pm   13 Jan 2004 17:29:53 -0000      1.78.2.1
***************
*** 1435,1439 ****
                                                        price                = 
?,                                               replacementprice     = ?,
                                                        replacementpricedate = 
NOW(),   itemnotes            = ?,
!                                                       notforloan = ?
                                                        ");
                $sth->execute($itemnumber,      $item->{'biblionumber'},
--- 1435,1439 ----
                                                        price                = 
?,                                               replacementprice     = ?,
                                                        replacementpricedate = 
NOW(),   itemnotes            = ?,
!                                                       bulk    =?,             
                                        notforloan = ?
                                                        ");
                $sth->execute($itemnumber,      $item->{'biblionumber'},
***************
*** 1442,1446 ****
                                                                
$item->{'homebranch'},$item->{'holdingbranch'},
                                                                
$item->{'price'},$item->{'replacementprice'},
!                                                               
$item->{'itemnotes'},$item->{'notforloan'});
        } else {
                $sth=$dbh->prepare("Insert into items set
--- 1442,1446 ----
                                                                
$item->{'homebranch'},$item->{'holdingbranch'},
                                                                
$item->{'price'},$item->{'replacementprice'},
!                                                               
$item->{'itemnotes'},$item->{'bulk'},$item->{'notforloan'});
        } else {
                $sth=$dbh->prepare("Insert into items set
***************
*** 1451,1455 ****
                                                        price                = 
?,                                               replacementprice     = ?,
                                                        replacementpricedate = 
NOW(),   itemnotes            = ?,
!                                                       notforloan = ?
                                                        ");
                $sth->execute($itemnumber,      $item->{'biblionumber'},
--- 1451,1455 ----
                                                        price                = 
?,                                               replacementprice     = ?,
                                                        replacementpricedate = 
NOW(),   itemnotes            = ?,
!                                                       bulk = ? , notforloan = 
?
                                                        ");
                $sth->execute($itemnumber,      $item->{'biblionumber'},
***************
*** 1458,1462 ****
                                                                
$item->{'homebranch'},$item->{'holdingbranch'},
                                                                
$item->{'price'},$item->{'replacementprice'},
!                                                               
$item->{'itemnotes'},$item->{'notforloan'});
        }
        if (defined $sth->errstr) {
--- 1458,1462 ----
                                                                
$item->{'homebranch'},$item->{'holdingbranch'},
                                                                
$item->{'price'},$item->{'replacementprice'},
!                                                               
$item->{'itemnotes'},$item->{'bulk'},$item->{'notforloan'});
        }
        if (defined $sth->errstr) {
***************
*** 2193,2196 ****
--- 2193,2200 ----
  # $Id$
  # $Log$
+ # Revision 1.78.2.1  2004/01/13 17:29:53  tipaul
+ # * minor html fixes
+ # * adding publisher in acquisition process (& ordering basket by publisher)
+ #
  # Revision 1.78  2003/12/09 15:57:28  tipaul
  # rolling back to working char_decode sub