Changeset 158 for branches/stable/cgi-bin/main.cgi

Timestamp:

02/09/05 15:53:56 (20 years ago)

Author:

Kris Deugau

Message:

/branches/stable

Merge all changes from /trunk r141-144 and r146

File:

• branches/stable/cgi-bin/main.cgi (modified) (2 diffs)

branches/stable/cgi-bin/main.cgi

@@ -14 +14 @@
 use DBI;
 use CommonWeb qw(:ALL);
-use IPDB 2.0 qw(:ALL);
+use MyIPDB;
 use CustIDCK;
 use POSIX qw(ceil);
@@ -38 +38 @@
 my $sth;
 my $errstr;
-($ip_dbh,$errstr) = connectDB("ipdb", "ipdb", "ipdbpwd");
+($ip_dbh,$errstr) = connectDB_My;
 if (!$ip_dbh) {
   printAndExit("Failed to connect to database: $errstr\n");