From: Allen Day Date: Tue, 9 Mar 2004 04:16:44 +0000 (+0000) Subject: no warnings for redefined methods X-Git-Tag: v0.06~149 X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=commitdiff_plain;h=f890ae867410ab189e6eab05013f3586f821d5f8;p=dbsrgits%2FSQL-Translator.git no warnings for redefined methods --- diff --git a/lib/SQL/Translator/Producer/Turnkey.pm b/lib/SQL/Translator/Producer/Turnkey.pm index 42256d9..64da4fb 100644 --- a/lib/SQL/Translator/Producer/Turnkey.pm +++ b/lib/SQL/Translator/Producer/Turnkey.pm @@ -1,7 +1,7 @@ package SQL::Translator::Producer::Turnkey; # ------------------------------------------------------------------- -# $Id: Turnkey.pm,v 1.26 2004-02-17 08:40:18 allenday Exp $ +# $Id: Turnkey.pm,v 1.27 2004-03-09 04:16:44 allenday Exp $ # ------------------------------------------------------------------- # Copyright (C) 2002-4 SQLFairy Authors # @@ -22,7 +22,7 @@ package SQL::Translator::Producer::Turnkey; use strict; use vars qw[ $VERSION $DEBUG ]; -$VERSION = sprintf "%d.%02d", q$Revision: 1.26 $ =~ /(\d+)\.(\d+)/; +$VERSION = sprintf "%d.%02d", q$Revision: 1.27 $ =~ /(\d+)\.(\d+)/; $DEBUG = 1 unless defined $DEBUG; use SQL::Translator::Schema::Constants; @@ -348,6 +348,7 @@ package [% baseclass %]; # Template used: classdbi use strict; +no warnings 'redefine'; use base qw(Class::DBI::Pg); [% baseclass %]->set_db('Main', '[% db_dsn %]', '[% db_user %]', '[% db_pass %]', {AutoCommit=>1});