Changeset 45 for trunk/npemap.org.uk

Timestamp:

Oct 15, 2006, 4:44:10 PM (15 years ago)

Author:

David Sheldon

Message:

output javascript method calls, a little less verbose

File:

• trunk/npemap.org.uk/cgi/get-postcodes.fcgi (modified) (2 diffs)

trunk/npemap.org.uk/cgi/get-postcodes.fcgi

@@ -66 +66 @@
     if ($sth->execute($cgi->param('mineasting'), $cgi->param('maxeasting'), $cgi->param('minnorthing'), $cgi->param('maxnorthing'))) {
         my $hr = $sth->fetchall_hashref('postcode');
-        print "Content-type: text/x-json\n\n";
-        print objToJson($hr) . "\n";
+        print "Content-type: text/javascript\n\n";
+
+        foreach my $key (keys %$hr) {
+            my $hash = $$hr{$key};
+            print "addMarker('$$hash{postcode}', $$hash{easting}, $$hash{northing});\n";
+        }
+        #print objToJson($hr) . "\n";
     } else {
         print_err("Database error retrieving data");
@@ -87 +92 @@
 sub setup_dbh {
     # $dbh is global
-    return $dbh = DBI->connect_cached("dbi:Pg:dbname=npemaps","npemaps","");
+    return $dbh = DBI->connect_cached("dbi:Pg:dbname=npemaps;host=127.0.0.1","npemaps","npemaps");
 }