Index: /branches/stable/cgi-bin/checkcusts.pl
===================================================================
--- /branches/stable/cgi-bin/checkcusts.pl	(revision 127)
+++ /branches/stable/cgi-bin/checkcusts.pl	(revision 128)
@@ -10,5 +10,5 @@
 
 use DBI;
-use IPDB qw(:ALL);
+use IPDB 2.0 qw(:ALL);
 
 # We'll be hosing the server with several thousand queries.  We
@@ -25,5 +25,5 @@
 print "Content-type: text/plain\n\n";
 
-$dbh = connectDB;
+($dbh,$errstr) = connectDB("ipdb", "ipdb", "ipdbpwd");
 $IDH = DBI->connect ("DBI:Pg:host=billing;dbname=custids", "cidcheck", "c1dch4ck");
 $sth = $dbh->prepare("select cidr,custid from searchme where not (custid='6750400') ".