diff options
author | Dave Whiteland <dave@mysociety.org> | 2012-11-14 07:59:00 +0000 |
---|---|---|
committer | Dave Whiteland <dave@mysociety.org> | 2012-11-14 07:59:00 +0000 |
commit | ccd8a2e06ab90202e0205cad3b0fb8ff9ed4b78e (patch) | |
tree | 20809adc5c8365e756e17de7bd5cbafb25a00121 /perllib/Utils.pm | |
parent | a82dc396d424a33f112d54874c9c643a0d2fddcf (diff) | |
parent | 63ad6d84fdeeb2fc8f2f1af2a3f26152d5dd4423 (diff) |
Merge branch 'master' of ssh://git.mysociety.org/data/git/public/fixmystreet
Diffstat (limited to 'perllib/Utils.pm')
-rw-r--r-- | perllib/Utils.pm | 18 |
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 ); |