switch to compatibility level 12

[debbugs.git] / Debbugs / DB.pm

diff --git a/Debbugs/DB.pm b/Debbugs/DB.pm
index 808a52deab87ae7859968030416cf2f49b13ce32..5f6bd040d8215978ce87ccd8a07baa3c4dd26a99 100644 (file)
--- a/Debbugs/DB.pm
+++ b/Debbugs/DB.pm
@@ -17,7 +17,17 @@ __PACKAGE__->load_namespaces;
 
 # This version must be incremented any time the schema changes so that
 # DBIx::Class::DeploymentHandler can do its work
-our $VERSION=1;
+our $VERSION=12;
 
 # You can replace this text with custom code or comments, and it will be preserved on regeneration
+
+# override connect to handle just passing a bare service
+sub connect {
+    my ($self,@rem) = @_;
+    if ($rem[0] !~ /:/) {
+       $rem[0] = 'dbi:Pg:service='.$rem[0];
+    }
+    $self->clone->connection(@rem);
+}
+
 1;