Changeset 402 for trunk

Timestamp:

05/11/10 17:33:34 (15 years ago)

Author:

Kris Deugau

Message:

/trunk

Merge miscellaneous microdifferences that have crept in. See #13.

Location:

trunk/cgi-bin

Files:

• IPDB.pm (modified) (1 diff)
• consistency-check.pl (modified) (1 diff)
• main.cgi (modified) (1 diff)
• search.cgi (modified) (2 diffs)

trunk/cgi-bin/IPDB.pm

@@ -118 +118 @@
   my ($dbname,$user,$pass) = @_;
   my $dbh;
-  my $DSN = "DBI:Pg:dbname=$dbname";
+  my $DSN = "DBI:Pg:host=ipdb-db;dbname=$dbname";
 #  my $user = 'ipdb';
 #  my $pw   = 'ipdbpwd';

trunk/cgi-bin/consistency-check.pl

@@ -17 +17 @@
 
 ($dbh,$errstr) = connectDB_My;
-
+die $errstr if !$dbh;
 # May as well.  We need a number of globals.
 initIPDBGlobals($dbh);

trunk/cgi-bin/main.cgi

@@ -32 +32 @@
 }
 
-syslog "debug", "$authuser active";
+syslog "debug", "$authuser active, $ENV{'REMOTE_ADDR'}";
 
 # Why not a global DB handle?  (And a global statement handle, as well...)

trunk/cgi-bin/search.cgi

@@ -318 +318 @@
     # Query for a customer ID.  Note that we can't restrict to "numeric-only"
     # as we have non-numeric custIDs in the legacy data.  :/
-    $sql = "select $cols from searchme where custid ilike '%$query%' or oldcustid ilike '%$query%'";
+    $sql = "select $cols from searchme where custid ilike '%$query%' or oldcustid ilike '%$query%' or description like '%$query%'";
     my $count = countRows($sql);
     $sql .= " order by cidr limit $RESULTS_PER_PAGE offset $offset";
@@ -500 +500 @@
   return $a[0];
 }
-