[Koha-cvs] CVS: koha/acqui.simple viewmarc.pl,1.4,1.4.2.1

[Andrew Arensburger]

Update of /cvsroot/koha/koha/acqui.simple
In directory usw-pr-cvs1:/tmp/cvs-serv19871

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


Index: viewmarc.pl
===================================================================
RCS file: /cvsroot/koha/koha/acqui.simple/viewmarc.pl,v
retrieving revision 1.4
retrieving revision 1.4.2.1
diff -C2 -r1.4 -r1.4.2.1
*** viewmarc.pl	14 Aug 2002 18:12:52 -0000	1.4
--- viewmarc.pl	4 Oct 2002 02:33:29 -0000	1.4.2.1
***************
*** 27,33 ****
  my $starttime=gettime();
  
- use C4::Database;
- use CGI;
  use strict;
  use C4::Catalogue;
  use C4::Biblio;
--- 27,33 ----
  my $starttime=gettime();
  
  use strict;
+ use CGI;
+ use C4::Context;
  use C4::Catalogue;
  use C4::Biblio;
***************
*** 36,40 ****
  
  my $input = new CGI;
! my $dbh=C4Connect;
  my $fields;
  marcdefs();
--- 36,40 ----
  
  my $input = new CGI;
! my $dbh = C4::Context->dbh;
  my $fields;
  marcdefs();