Remove unused function, add gridref test.

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 );