[Koha-cvs] CVS: koha/C4 Biblio.pm,1.115,1.115.2.1

[Paul POULAIN]

Update of /cvsroot/koha/koha/C4
In directory sc8-pr-cvs1.sourceforge.net:/tmp/cvs-serv8822/C4

Modified Files:
      Tag: rel_2_2
	Biblio.pm 
Log Message:
bugfix : issn were not stored correctly in non-MARC DB on biblio modification

Index: Biblio.pm
===================================================================
RCS file: /cvsroot/koha/koha/C4/Biblio.pm,v
retrieving revision 1.115
retrieving revision 1.115.2.1
diff -C2 -r1.115 -r1.115.2.1
*** Biblio.pm	6 Jan 2005 14:32:17 -0000	1.115
--- Biblio.pm	11 Jan 2005 14:45:37 -0000	1.115.2.1
***************
*** 1602,1607 ****
  sub OLDmodbibitem {
      my ( $dbh, $biblioitem ) = @_;
- 
-     #    my $dbh   = C4Connect;
      my $query;
  
--- 1602,1605 ----
***************
*** 1609,1612 ****
--- 1607,1611 ----
      $biblioitem->{'url'}           = $dbh->quote( $biblioitem->{'url'} );
      $biblioitem->{'isbn'}          = $dbh->quote( $biblioitem->{'isbn'} );
+     $biblioitem->{'issn'}          = $dbh->quote( $biblioitem->{'issn'} );
      $biblioitem->{'publishercode'} =
        $dbh->quote( $biblioitem->{'publishercode'} );
***************
*** 1628,1631 ****
--- 1627,1631 ----
  url             = $biblioitem->{'url'},
  isbn            = $biblioitem->{'isbn'},
+ issn            = $biblioitem->{'issn'},
  publishercode   = $biblioitem->{'publishercode'},
  publicationyear = $biblioitem->{'publicationyear'},
***************
*** 1645,1650 ****
          warn "$query";
      }
- 
-     #    $dbh->disconnect;
  }    # sub modbibitem
  
--- 1645,1648 ----
***************
*** 2634,2637 ****
--- 2632,2638 ----
  # $Id$
  # $Log$
+ # Revision 1.115.2.1  2005/01/11 14:45:37  tipaul
+ # bugfix : issn were not stored correctly in non-MARC DB on biblio modification
+ #
  # Revision 1.115  2005/01/06 14:32:17  tipaul
  # improvement of speed for bulkmarcimport.