[Koha-cvs] CVS: koha/C4 Z3950.pm,1.3,1.4

[Andrew Arensburger]

Update of /cvsroot/koha/koha/C4
In directory usw-pr-cvs1:/tmp/cvs-serv1125

Modified Files:
        Z3950.pm 
Log Message:
Replaced &requireDBI with C4::Context->dbh


Index: Z3950.pm
===================================================================
RCS file: /cvsroot/koha/koha/C4/Z3950.pm,v
retrieving revision 1.3
retrieving revision 1.4
diff -C2 -r1.3 -r1.4
*** Z3950.pm    14 Aug 2002 18:12:52 -0000      1.3
--- Z3950.pm    11 Oct 2002 12:35:35 -0000      1.4
***************
*** 92,96 ****
      # inputs
      my (
!       $dbh,
        $srvid,         # server id number 
        $default,
--- 92,96 ----
      # inputs
      my (
!       $dbh,           # FIXME - Unused argument
        $srvid,         # server id number 
        $default,
***************
*** 100,105 ****
      #----
  
!     requireDBI($dbh,"z3950servername");
  
        my $sti=$dbh->prepare("select name 
                from z3950servers 
--- 100,106 ----
      #----
  
!     $dbh = C4::Context->dbh;
  
+       # FIXME - Fix indentation
        my $sti=$dbh->prepare("select name 
                from z3950servers 
***************
*** 121,124 ****
--- 122,126 ----
      my (
        $dbh,           # DBI handle
+                       # FIXME - Unused argument
        $query,         # value to look up
        $type,          # type of value ("isbn", "lccn", etc).
***************
*** 141,145 ****
      $error="";
  
!     requireDBI($dbh,"addz3950queue");
  
        # list of servers: entry can be a fully qualified URL-type entry
--- 143,149 ----
      $error="";
  
!     $dbh = C4::Context->dbh;
! 
!       # FIXME - Fix indentation
  
        # list of servers: entry can be a fully qualified URL-type entry
***************
*** 208,211 ****
--- 212,218 ----
  #--------------------------------------
  # $Log$
+ # Revision 1.4  2002/10/11 12:35:35  arensb
+ # Replaced &requireDBI with C4::Context->dbh
+ #
  # Revision 1.3  2002/08/14 18:12:52  tonnesen
  # Added copyright statement to all .pl and .pm files