aboutsummaryrefslogtreecommitdiffstats
path: root/perllib/Utils.pm
diff options
context:
space:
mode:
authorDave Whiteland <dave@mysociety.org>2012-11-14 07:59:00 +0000
committerDave Whiteland <dave@mysociety.org>2012-11-14 07:59:00 +0000
commitccd8a2e06ab90202e0205cad3b0fb8ff9ed4b78e (patch)
tree20809adc5c8365e756e17de7bd5cbafb25a00121 /perllib/Utils.pm
parenta82dc396d424a33f112d54874c9c643a0d2fddcf (diff)
parent63ad6d84fdeeb2fc8f2f1af2a3f26152d5dd4423 (diff)
Merge branch 'master' of ssh://git.mysociety.org/data/git/public/fixmystreet
Diffstat (limited to 'perllib/Utils.pm')
-rw-r--r--perllib/Utils.pm18
1 files changed, 0 insertions, 18 deletions
diff --git a/perllib/Utils.pm b/perllib/Utils.pm
index ab7bc6e12..fa90620a0 100644
--- a/perllib/Utils.pm
+++ b/perllib/Utils.pm
@@ -19,24 +19,6 @@ use mySociety::DBHandle qw(dbh);
use mySociety::GeoUtil;
use mySociety::Locale;
-sub workaround_pg_bytea {
- my ( $st, $img_idx, @elements ) = @_;
- my $s = dbh()->prepare($st);
- for ( my $i = 1 ; $i <= @elements ; $i++ ) {
- if ( $i == $img_idx ) {
- $s->bind_param(
- $i,
- $elements[ $i - 1 ],
- { pg_type => DBD::Pg::PG_BYTEA }
- );
- }
- else {
- $s->bind_param( $i, $elements[ $i - 1 ] );
- }
- }
- $s->execute();
-}
-
=head2 convert_latlon_to_en
( $easting, $northing ) = Utils::convert_en_to_latlon( $latitude, $longitude );