[Koha-cvs] CVS: koha/marc test,1.2,1.2.2.1

[Andrew Arensburger]

Update of /cvsroot/koha/koha/marc
In directory usw-pr-cvs1:/tmp/cvs-serv22789

Modified Files:
      Tag: arensb-context
        test 
Log Message:
Use C4::Connect instead of C4::Database, C4::Connect->dbh instead
C4Connect.


Index: test
===================================================================
RCS file: /cvsroot/koha/koha/marc/test,v
retrieving revision 1.2
retrieving revision 1.2.2.1
diff -C2 -r1.2 -r1.2.2.1
*** test        20 Jun 2002 17:33:17 -0000      1.2
--- test        4 Oct 2002 02:40:18 -0000       1.2.2.1
***************
*** 1,7 ****
  #!/usr/bin/perl
! 
! 
! 
! use C4::Database;
  use C4::Catalogue;
  use CGI;
--- 1,4 ----
  #!/usr/bin/perl
! use C4::Context;
  use C4::Catalogue;
  use CGI;
***************
*** 14,18 ****
  
  
! my $dbh=C4Connect;
  
  my $newschool=$ARGV[0];
--- 11,15 ----
  
  
! my $dbh = C4::Context->dbh;
  
  my $newschool=$ARGV[0];
***************
*** 32,34 ****
  updateItem($env, $item);
  $sth->finish;
- $dbh->disconnect;
--- 29,30 ----