From: Peter Rabbitson Date: Fri, 13 Feb 2009 08:15:01 +0000 (+0000) Subject: Downgrade global version - highest version in 9002 on cpan is 1.58 - thus go with... X-Git-Tag: v0.11008~227 X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=commitdiff_plain;h=4ab3763d2ad756c236b757306989cafa08e7f35e;p=dbsrgits%2FSQL-Translator.git Downgrade global version - highest version in 9002 on cpan is 1.58 - thus go with 1.59 --- diff --git a/bin/sqlt b/bin/sqlt index 28c0809..7999c09 100755 --- a/bin/sqlt +++ b/bin/sqlt @@ -152,7 +152,7 @@ use Pod::Usage; use SQL::Translator; use vars qw( $VERSION ); -$VERSION = '1.99'; +$VERSION = '1.59'; my $from; # the original database my $to; # the destination database diff --git a/bin/sqlt-diagram b/bin/sqlt-diagram index 4c23445..c47aca7 100755 --- a/bin/sqlt-diagram +++ b/bin/sqlt-diagram @@ -74,7 +74,7 @@ use Pod::Usage; use SQL::Translator; use vars '$VERSION'; -$VERSION = '1.99'; +$VERSION = '1.59'; # # Get arguments. diff --git a/bin/sqlt-diff b/bin/sqlt-diff index 230994f..0afc495 100755 --- a/bin/sqlt-diff +++ b/bin/sqlt-diff @@ -110,7 +110,7 @@ use SQL::Translator::Diff; use SQL::Translator::Schema::Constants; use vars qw( $VERSION ); -$VERSION = '1.99'; +$VERSION = '1.59'; my ( @input, $list, $help, $debug, $trace, $caseopt, $ignore_index_names, $ignore_constraint_names, $output_db, $mysql_parser_version, diff --git a/bin/sqlt-diff-old b/bin/sqlt-diff-old index 52cac4f..7ec9b78 100755 --- a/bin/sqlt-diff-old +++ b/bin/sqlt-diff-old @@ -95,7 +95,7 @@ use SQL::Translator; use SQL::Translator::Schema::Constants; use vars qw( $VERSION ); -$VERSION = '1.99'; +$VERSION = '1.59'; my ( @input, $list, $help, $debug ); for my $arg ( @ARGV ) { diff --git a/bin/sqlt-dumper b/bin/sqlt-dumper index 5b98f1b..796711f 100755 --- a/bin/sqlt-dumper +++ b/bin/sqlt-dumper @@ -61,7 +61,7 @@ use SQL::Translator; use File::Basename qw(basename); use vars '$VERSION'; -$VERSION = '1.99'; +$VERSION = '1.59'; my ( $help, $db, $skip, $skiplike, $db_user, $db_pass, $dsn ); GetOptions( diff --git a/bin/sqlt-graph b/bin/sqlt-graph index ee35a07..a5804e9 100755 --- a/bin/sqlt-graph +++ b/bin/sqlt-graph @@ -97,7 +97,7 @@ use Pod::Usage; use SQL::Translator; use vars '$VERSION'; -$VERSION = '1.99'; +$VERSION = '1.59'; # # Get arguments. diff --git a/bin/sqlt.cgi b/bin/sqlt.cgi index 2156620..513042d 100755 --- a/bin/sqlt.cgi +++ b/bin/sqlt.cgi @@ -37,7 +37,7 @@ use CGI; use SQL::Translator; use vars '$VERSION'; -$VERSION = '1.99'; +$VERSION = '1.59'; my $q = CGI->new; diff --git a/lib/SQL/Translator/Filter/DefaultExtra.pm b/lib/SQL/Translator/Filter/DefaultExtra.pm index c432749..21ebec8 100644 --- a/lib/SQL/Translator/Filter/DefaultExtra.pm +++ b/lib/SQL/Translator/Filter/DefaultExtra.pm @@ -51,7 +51,7 @@ objects. use strict; use vars qw/$VERSION/; -$VERSION = '1.99'; +$VERSION = '1.59'; sub filter { my $schema = shift; diff --git a/lib/SQL/Translator/Filter/Globals.pm b/lib/SQL/Translator/Filter/Globals.pm index 2b29b94..e1ead93 100644 --- a/lib/SQL/Translator/Filter/Globals.pm +++ b/lib/SQL/Translator/Filter/Globals.pm @@ -56,7 +56,7 @@ SQL::Translator::Filter::Globals - Add global fields and indices to all tables. use strict; use vars qw/$VERSION/; -$VERSION = '1.99'; +$VERSION = '1.59'; sub filter { my $schema = shift; diff --git a/lib/SQL/Translator/Filter/Names.pm b/lib/SQL/Translator/Filter/Names.pm index f8f17df..afa0f1f 100644 --- a/lib/SQL/Translator/Filter/Names.pm +++ b/lib/SQL/Translator/Filter/Names.pm @@ -47,7 +47,7 @@ SQL::Translator::Filter::Names - Tweak the names of schema objects. use strict; use vars qw/$VERSION/; -$VERSION = '1.99'; +$VERSION = '1.59'; sub filter { my $schema = shift; diff --git a/lib/SQL/Translator/Parser.pm b/lib/SQL/Translator/Parser.pm index e9860b7..e9a483b 100644 --- a/lib/SQL/Translator/Parser.pm +++ b/lib/SQL/Translator/Parser.pm @@ -20,7 +20,7 @@ package SQL::Translator::Parser; use strict; use vars qw( $VERSION ); -$VERSION = '1.99'; +$VERSION = '1.59'; sub parse { "" } diff --git a/lib/SQL/Translator/Parser/Access.pm b/lib/SQL/Translator/Parser/Access.pm index 658046d..696ebcb 100644 --- a/lib/SQL/Translator/Parser/Access.pm +++ b/lib/SQL/Translator/Parser/Access.pm @@ -39,7 +39,7 @@ something similar to the output of mdbtools (http://mdbtools.sourceforge.net/). use strict; use vars qw[ $DEBUG $VERSION $GRAMMAR @EXPORT_OK ]; -$VERSION = '1.99'; +$VERSION = '1.59'; $DEBUG = 0 unless defined $DEBUG; use Data::Dumper; diff --git a/lib/SQL/Translator/Parser/DBI.pm b/lib/SQL/Translator/Parser/DBI.pm index 17e8326..521b0d2 100644 --- a/lib/SQL/Translator/Parser/DBI.pm +++ b/lib/SQL/Translator/Parser/DBI.pm @@ -119,7 +119,7 @@ query Oracle directly and skip the parsing of a text file, too. use strict; use DBI; use vars qw($VERSION @EXPORT); -$VERSION = '1.99'; +$VERSION = '1.59'; use constant DRIVERS => { mysql => 'MySQL', diff --git a/lib/SQL/Translator/Parser/DBI/DB2.pm b/lib/SQL/Translator/Parser/DBI/DB2.pm index cf859d1..9dcf35e 100644 --- a/lib/SQL/Translator/Parser/DBI/DB2.pm +++ b/lib/SQL/Translator/Parser/DBI/DB2.pm @@ -22,7 +22,7 @@ use SQL::Translator::Parser::DB2; use SQL::Translator::Schema::Constants; use vars qw[ $DEBUG $VERSION @EXPORT_OK ]; -# $VERSION = '1.99'; +# $VERSION = '1.59'; $DEBUG = 0 unless defined $DEBUG; # ------------------------------------------------------------------- diff --git a/lib/SQL/Translator/Parser/DBI/MySQL.pm b/lib/SQL/Translator/Parser/DBI/MySQL.pm index 801d2d8..6c00894 100644 --- a/lib/SQL/Translator/Parser/DBI/MySQL.pm +++ b/lib/SQL/Translator/Parser/DBI/MySQL.pm @@ -41,7 +41,7 @@ use SQL::Translator::Schema::Constants; use SQL::Translator::Parser::MySQL; use vars qw[ $DEBUG $VERSION @EXPORT_OK ]; -$VERSION = '1.99'; +$VERSION = '1.59'; $DEBUG = 0 unless defined $DEBUG; # ------------------------------------------------------------------- diff --git a/lib/SQL/Translator/Parser/DBI/Oracle.pm b/lib/SQL/Translator/Parser/DBI/Oracle.pm index aa076ab..d111387 100644 --- a/lib/SQL/Translator/Parser/DBI/Oracle.pm +++ b/lib/SQL/Translator/Parser/DBI/Oracle.pm @@ -40,7 +40,7 @@ use SQL::Translator::Schema::Table; use SQL::Translator::Schema::Field; use SQL::Translator::Schema::Constraint; -our $VERSION = '1.99'; +our $VERSION = '1.59'; # ------------------------------------------------------------------- sub parse { diff --git a/lib/SQL/Translator/Parser/DBI/PostgreSQL.pm b/lib/SQL/Translator/Parser/DBI/PostgreSQL.pm index f256a77..1cff529 100644 --- a/lib/SQL/Translator/Parser/DBI/PostgreSQL.pm +++ b/lib/SQL/Translator/Parser/DBI/PostgreSQL.pm @@ -38,7 +38,7 @@ use Data::Dumper; use SQL::Translator::Schema::Constants; use vars qw[ $DEBUG $VERSION @EXPORT_OK ]; -$VERSION = '1.99'; +$VERSION = '1.59'; $DEBUG = 0 unless defined $DEBUG; # ------------------------------------------------------------------- diff --git a/lib/SQL/Translator/Parser/DBI/SQLServer.pm b/lib/SQL/Translator/Parser/DBI/SQLServer.pm index 8cff924..267e6f8 100644 --- a/lib/SQL/Translator/Parser/DBI/SQLServer.pm +++ b/lib/SQL/Translator/Parser/DBI/SQLServer.pm @@ -38,7 +38,7 @@ use SQL::Translator::Schema; use Data::Dumper; use vars qw[ $DEBUG $VERSION @EXPORT_OK ]; -$VERSION = '1.99'; +$VERSION = '1.59'; $DEBUG = 0 unless defined $DEBUG; no strict 'refs'; diff --git a/lib/SQL/Translator/Parser/DBI/SQLite.pm b/lib/SQL/Translator/Parser/DBI/SQLite.pm index 522924f..a95630e 100644 --- a/lib/SQL/Translator/Parser/DBI/SQLite.pm +++ b/lib/SQL/Translator/Parser/DBI/SQLite.pm @@ -43,7 +43,7 @@ use SQL::Translator::Parser::SQLite; use Data::Dumper; use vars qw[ $DEBUG $VERSION @EXPORT_OK ]; -$VERSION = '1.99'; +$VERSION = '1.59'; $DEBUG = 0 unless defined $DEBUG; # ------------------------------------------------------------------- diff --git a/lib/SQL/Translator/Parser/DBI/Sybase.pm b/lib/SQL/Translator/Parser/DBI/Sybase.pm index 79e3b45..d800fe0 100644 --- a/lib/SQL/Translator/Parser/DBI/Sybase.pm +++ b/lib/SQL/Translator/Parser/DBI/Sybase.pm @@ -38,7 +38,7 @@ use SQL::Translator::Schema; use Data::Dumper; use vars qw[ $DEBUG $VERSION @EXPORT_OK ]; -$VERSION = '1.99'; +$VERSION = '1.59'; $DEBUG = 0 unless defined $DEBUG; no strict 'refs'; diff --git a/lib/SQL/Translator/Parser/Excel.pm b/lib/SQL/Translator/Parser/Excel.pm index 62adc79..0d98f6b 100644 --- a/lib/SQL/Translator/Parser/Excel.pm +++ b/lib/SQL/Translator/Parser/Excel.pm @@ -49,7 +49,7 @@ and field sizes. True by default. use strict; use vars qw($DEBUG $VERSION @EXPORT_OK); $DEBUG = 0 unless defined $DEBUG; -$VERSION = '1.99'; +$VERSION = '1.59'; use Spreadsheet::ParseExcel; use Exporter; diff --git a/lib/SQL/Translator/Parser/MySQL.pm b/lib/SQL/Translator/Parser/MySQL.pm index 1f4e167..db55604 100644 --- a/lib/SQL/Translator/Parser/MySQL.pm +++ b/lib/SQL/Translator/Parser/MySQL.pm @@ -147,7 +147,7 @@ More information about the MySQL comment-syntax: Lkclark@cpan.orgE. use strict; use vars qw[ $VERSION $DEBUG ]; -$VERSION = '1.99'; +$VERSION = '1.59'; $DEBUG = 1 unless defined $DEBUG; use SQL::Translator::Parser::XML::SQLFairy; diff --git a/lib/SQL/Translator/Parser/XML/SQLFairy.pm b/lib/SQL/Translator/Parser/XML/SQLFairy.pm index 6a4318d..78d7f15 100644 --- a/lib/SQL/Translator/Parser/XML/SQLFairy.pm +++ b/lib/SQL/Translator/Parser/XML/SQLFairy.pm @@ -98,7 +98,7 @@ To convert your old format files simply pass them through the translator :) use strict; use vars qw[ $DEBUG $VERSION @EXPORT_OK ]; -$VERSION = '1.99'; +$VERSION = '1.59'; $DEBUG = 0 unless defined $DEBUG; use Data::Dumper; diff --git a/lib/SQL/Translator/Parser/YAML.pm b/lib/SQL/Translator/Parser/YAML.pm index e1daebf..4170d1f 100644 --- a/lib/SQL/Translator/Parser/YAML.pm +++ b/lib/SQL/Translator/Parser/YAML.pm @@ -20,7 +20,7 @@ package SQL::Translator::Parser::YAML; use strict; use vars qw($VERSION); -$VERSION = '1.99'; +$VERSION = '1.59'; use SQL::Translator::Schema; use SQL::Translator::Utils qw(header_comment); diff --git a/lib/SQL/Translator/Parser/xSV.pm b/lib/SQL/Translator/Parser/xSV.pm index 77981a0..3ab2f12 100644 --- a/lib/SQL/Translator/Parser/xSV.pm +++ b/lib/SQL/Translator/Parser/xSV.pm @@ -65,7 +65,7 @@ C. use strict; use vars qw($VERSION @EXPORT); -$VERSION = '1.99'; +$VERSION = '1.59'; use Exporter; use Text::ParseWords qw(quotewords); diff --git a/lib/SQL/Translator/Producer.pm b/lib/SQL/Translator/Producer.pm index c70e78a..c80d804 100644 --- a/lib/SQL/Translator/Producer.pm +++ b/lib/SQL/Translator/Producer.pm @@ -20,7 +20,7 @@ package SQL::Translator::Producer; use strict; use vars qw($VERSION); -$VERSION = '1.99'; +$VERSION = '1.59'; sub produce { "" } diff --git a/lib/SQL/Translator/Producer/ClassDBI.pm b/lib/SQL/Translator/Producer/ClassDBI.pm index 42f02b3..9868675 100755 --- a/lib/SQL/Translator/Producer/ClassDBI.pm +++ b/lib/SQL/Translator/Producer/ClassDBI.pm @@ -20,7 +20,7 @@ package SQL::Translator::Producer::ClassDBI; use strict; use vars qw[ $VERSION $DEBUG ]; -$VERSION = '1.99'; +$VERSION = '1.59'; $DEBUG = 1 unless defined $DEBUG; use SQL::Translator::Schema::Constants; diff --git a/lib/SQL/Translator/Producer/DB2.pm b/lib/SQL/Translator/Producer/DB2.pm index 418d63e..d9691a4 100644 --- a/lib/SQL/Translator/Producer/DB2.pm +++ b/lib/SQL/Translator/Producer/DB2.pm @@ -37,7 +37,7 @@ Creates an SQL DDL suitable for DB2. use warnings; use strict; use vars qw[ $VERSION $DEBUG $WARN ]; -$VERSION = '1.99'; +$VERSION = '1.59'; $DEBUG = 0 unless defined $DEBUG; use SQL::Translator::Schema::Constants; diff --git a/lib/SQL/Translator/Producer/DiaUml.pm b/lib/SQL/Translator/Producer/DiaUml.pm index 7e1f543..ea985f1 100644 --- a/lib/SQL/Translator/Producer/DiaUml.pm +++ b/lib/SQL/Translator/Producer/DiaUml.pm @@ -57,7 +57,7 @@ automatically arrange them horizontally or vertically. use strict; use vars qw[ $DEBUG $VERSION @EXPORT_OK ]; -$VERSION = '1.99'; +$VERSION = '1.59'; $DEBUG = 0 unless defined $DEBUG; use SQL::Translator::Utils 'debug'; diff --git a/lib/SQL/Translator/Producer/Diagram.pm b/lib/SQL/Translator/Producer/Diagram.pm index b2f92aa..34cd56b 100644 --- a/lib/SQL/Translator/Producer/Diagram.pm +++ b/lib/SQL/Translator/Producer/Diagram.pm @@ -40,7 +40,7 @@ use SQL::Translator::Schema::Constants; use SQL::Translator::Utils qw(debug); use vars qw[ $VERSION $DEBUG ]; -$VERSION = '1.99'; +$VERSION = '1.59'; $DEBUG = 0 unless defined $DEBUG; use constant VALID_FONT_SIZE => { diff --git a/lib/SQL/Translator/Producer/Dumper.pm b/lib/SQL/Translator/Producer/Dumper.pm index f4b2fbf..b24b78b 100644 --- a/lib/SQL/Translator/Producer/Dumper.pm +++ b/lib/SQL/Translator/Producer/Dumper.pm @@ -59,7 +59,7 @@ use vars qw($VERSION); use Data::Dumper; -$VERSION = '1.99'; +$VERSION = '1.59'; sub produce { my $t = shift; diff --git a/lib/SQL/Translator/Producer/GraphViz.pm b/lib/SQL/Translator/Producer/GraphViz.pm index e0d18f8..ca1e6fd 100644 --- a/lib/SQL/Translator/Producer/GraphViz.pm +++ b/lib/SQL/Translator/Producer/GraphViz.pm @@ -211,7 +211,7 @@ use SQL::Translator::Utils qw(debug); use Scalar::Util qw/openhandle/; use vars qw[ $VERSION $DEBUG ]; -$VERSION = '1.99'; +$VERSION = '1.59'; $DEBUG = 0 unless defined $DEBUG; use constant VALID_LAYOUT => { diff --git a/lib/SQL/Translator/Producer/HTML.pm b/lib/SQL/Translator/Producer/HTML.pm index 1b37479..721fbba 100644 --- a/lib/SQL/Translator/Producer/HTML.pm +++ b/lib/SQL/Translator/Producer/HTML.pm @@ -22,7 +22,7 @@ use strict; use Data::Dumper; use vars qw($VERSION $NOWRAP $NOLINKTABLE $NAME); -$VERSION = '1.99'; +$VERSION = '1.59'; $NAME = __PACKAGE__; $NOWRAP = 0 unless defined $NOWRAP; diff --git a/lib/SQL/Translator/Producer/Latex.pm b/lib/SQL/Translator/Producer/Latex.pm index 86b10d7..c2bbf79 100644 --- a/lib/SQL/Translator/Producer/Latex.pm +++ b/lib/SQL/Translator/Producer/Latex.pm @@ -57,7 +57,7 @@ automatically arrange them horizontally or vertically. use strict; use vars qw[ $DEBUG $VERSION @EXPORT_OK ]; -$VERSION = '1.99'; +$VERSION = '1.59'; $DEBUG = 0 unless defined $DEBUG; use SQL::Translator::Utils 'debug'; diff --git a/lib/SQL/Translator/Producer/MySQL.pm b/lib/SQL/Translator/Producer/MySQL.pm index 60a85b5..c6af310 100644 --- a/lib/SQL/Translator/Producer/MySQL.pm +++ b/lib/SQL/Translator/Producer/MySQL.pm @@ -100,7 +100,7 @@ Set the fields charater set and collation order. use strict; use warnings; use vars qw[ $VERSION $DEBUG %used_names ]; -$VERSION = '1.99'; +$VERSION = '1.59'; $DEBUG = 0 unless defined $DEBUG; # Maximum length for most identifiers is 64, according to: diff --git a/lib/SQL/Translator/Producer/Oracle.pm b/lib/SQL/Translator/Producer/Oracle.pm index 89007c6..e2ea448 100644 --- a/lib/SQL/Translator/Producer/Oracle.pm +++ b/lib/SQL/Translator/Producer/Oracle.pm @@ -98,7 +98,7 @@ context the slash will be still there to ensure compatibility with SQLPlus. use strict; use vars qw[ $VERSION $DEBUG $WARN ]; -$VERSION = '1.99'; +$VERSION = '1.59'; $DEBUG = 0 unless defined $DEBUG; use SQL::Translator::Schema::Constants; diff --git a/lib/SQL/Translator/Producer/POD.pm b/lib/SQL/Translator/Producer/POD.pm index 753d905..377b41e 100644 --- a/lib/SQL/Translator/Producer/POD.pm +++ b/lib/SQL/Translator/Producer/POD.pm @@ -40,7 +40,7 @@ interesting formats using Pod::POM or Template::Toolkit's POD plugin. use strict; use vars qw[ $VERSION ]; -$VERSION = '1.99'; +$VERSION = '1.59'; use SQL::Translator::Schema::Constants; use SQL::Translator::Utils qw(header_comment); diff --git a/lib/SQL/Translator/Producer/PostgreSQL.pm b/lib/SQL/Translator/Producer/PostgreSQL.pm index a464a85..d778af4 100644 --- a/lib/SQL/Translator/Producer/PostgreSQL.pm +++ b/lib/SQL/Translator/Producer/PostgreSQL.pm @@ -37,7 +37,7 @@ producer. use strict; use warnings; use vars qw[ $DEBUG $WARN $VERSION %used_names ]; -$VERSION = '1.99'; +$VERSION = '1.59'; $DEBUG = 0 unless defined $DEBUG; use base qw(SQL::Translator::Producer); diff --git a/lib/SQL/Translator/Producer/SQLServer.pm b/lib/SQL/Translator/Producer/SQLServer.pm index aee3e40..6c9b569 100644 --- a/lib/SQL/Translator/Producer/SQLServer.pm +++ b/lib/SQL/Translator/Producer/SQLServer.pm @@ -54,7 +54,7 @@ List of values for an enum field. use strict; use vars qw[ $DEBUG $WARN $VERSION ]; -$VERSION = '1.99'; +$VERSION = '1.59'; $DEBUG = 1 unless defined $DEBUG; use Data::Dumper; diff --git a/lib/SQL/Translator/Producer/SQLite.pm b/lib/SQL/Translator/Producer/SQLite.pm index 630e845..c1fa840 100644 --- a/lib/SQL/Translator/Producer/SQLite.pm +++ b/lib/SQL/Translator/Producer/SQLite.pm @@ -43,7 +43,7 @@ use SQL::Translator::Utils qw(debug header_comment); use vars qw[ $VERSION $DEBUG $WARN ]; -$VERSION = '1.99'; +$VERSION = '1.59'; $DEBUG = 0 unless defined $DEBUG; $WARN = 0 unless defined $WARN; diff --git a/lib/SQL/Translator/Producer/Storable.pm b/lib/SQL/Translator/Producer/Storable.pm index a31abd0..3c918c0 100755 --- a/lib/SQL/Translator/Producer/Storable.pm +++ b/lib/SQL/Translator/Producer/Storable.pm @@ -41,7 +41,7 @@ takes a long time. use strict; use vars qw($DEBUG $VERSION @EXPORT_OK); $DEBUG = 0 unless defined $DEBUG; -$VERSION = '1.99'; +$VERSION = '1.59'; use Storable; use Exporter; diff --git a/lib/SQL/Translator/Producer/Sybase.pm b/lib/SQL/Translator/Producer/Sybase.pm index 57fcc47..1cf47b5 100644 --- a/lib/SQL/Translator/Producer/Sybase.pm +++ b/lib/SQL/Translator/Producer/Sybase.pm @@ -37,7 +37,7 @@ This module will produce text output of the schema suitable for Sybase. use strict; use vars qw[ $DEBUG $WARN $VERSION ]; -$VERSION = '1.99'; +$VERSION = '1.59'; $DEBUG = 1 unless defined $DEBUG; use Data::Dumper; diff --git a/lib/SQL/Translator/Producer/TT/Base.pm b/lib/SQL/Translator/Producer/TT/Base.pm index 4b03789..7533820 100644 --- a/lib/SQL/Translator/Producer/TT/Base.pm +++ b/lib/SQL/Translator/Producer/TT/Base.pm @@ -30,7 +30,7 @@ class. use strict; use vars qw[ $VERSION @EXPORT_OK ]; -$VERSION = '1.99'; +$VERSION = '1.59'; use Template; use Data::Dumper; diff --git a/lib/SQL/Translator/Producer/TT/Table.pm b/lib/SQL/Translator/Producer/TT/Table.pm index 15d859e..53d5df3 100644 --- a/lib/SQL/Translator/Producer/TT/Table.pm +++ b/lib/SQL/Translator/Producer/TT/Table.pm @@ -176,7 +176,7 @@ whitespace either side, to be recognised. use strict; use vars qw[ $DEBUG $VERSION @EXPORT_OK ]; -$VERSION = '1.99'; +$VERSION = '1.59'; $DEBUG = 0 unless defined $DEBUG; use File::Path; diff --git a/lib/SQL/Translator/Producer/TTSchema.pm b/lib/SQL/Translator/Producer/TTSchema.pm index 3bdddc6..839e22e 100644 --- a/lib/SQL/Translator/Producer/TTSchema.pm +++ b/lib/SQL/Translator/Producer/TTSchema.pm @@ -127,7 +127,7 @@ constructor. use strict; use vars qw[ $DEBUG $VERSION @EXPORT_OK ]; -$VERSION = '1.99'; +$VERSION = '1.59'; $DEBUG = 0 unless defined $DEBUG; use Template; diff --git a/lib/SQL/Translator/Producer/XML.pm b/lib/SQL/Translator/Producer/XML.pm index 309b597..dc3196a 100644 --- a/lib/SQL/Translator/Producer/XML.pm +++ b/lib/SQL/Translator/Producer/XML.pm @@ -44,7 +44,7 @@ Ken Y. Clark Ekclark@cpan.orgE. use strict; use vars qw[ $VERSION $DEBUG ]; -$VERSION = '1.99'; +$VERSION = '1.59'; $DEBUG = 1 unless defined $DEBUG; use SQL::Translator::Producer::XML::SQLFairy; diff --git a/lib/SQL/Translator/Producer/XML/SQLFairy.pm b/lib/SQL/Translator/Producer/XML/SQLFairy.pm index d056682..972ffe1 100644 --- a/lib/SQL/Translator/Producer/XML/SQLFairy.pm +++ b/lib/SQL/Translator/Producer/XML/SQLFairy.pm @@ -163,7 +163,7 @@ To convert your old format files simply pass them through the translator :) use strict; use vars qw[ $VERSION @EXPORT_OK ]; -$VERSION = '1.99'; +$VERSION = '1.59'; use Exporter; use base qw(Exporter); diff --git a/lib/SQL/Translator/Producer/YAML.pm b/lib/SQL/Translator/Producer/YAML.pm index 82e7eaa..98bdd90 100644 --- a/lib/SQL/Translator/Producer/YAML.pm +++ b/lib/SQL/Translator/Producer/YAML.pm @@ -39,7 +39,7 @@ takes a long time. use strict; use vars qw($VERSION); -$VERSION = '1.99'; +$VERSION = '1.59'; use YAML qw(Dump); diff --git a/lib/SQL/Translator/Schema.pm b/lib/SQL/Translator/Schema.pm index badf893..926cf7c 100644 --- a/lib/SQL/Translator/Schema.pm +++ b/lib/SQL/Translator/Schema.pm @@ -56,7 +56,7 @@ use SQL::Translator::Utils 'parse_list_arg'; use base 'SQL::Translator::Schema::Object'; use vars qw[ $VERSION $TABLE_ORDER $VIEW_ORDER $TRIGGER_ORDER $PROC_ORDER ]; -$VERSION = '1.99'; +$VERSION = '1.59'; __PACKAGE__->_attributes(qw/name database translator/); diff --git a/lib/SQL/Translator/Schema/Constants.pm b/lib/SQL/Translator/Schema/Constants.pm index 5625f41..f4a456d 100644 --- a/lib/SQL/Translator/Schema/Constants.pm +++ b/lib/SQL/Translator/Schema/Constants.pm @@ -61,7 +61,7 @@ use strict; use base qw( Exporter ); use vars qw( @EXPORT $VERSION ); require Exporter; -$VERSION = '1.99'; +$VERSION = '1.59'; @EXPORT = qw[ CHECK_C diff --git a/lib/SQL/Translator/Schema/Constraint.pm b/lib/SQL/Translator/Schema/Constraint.pm index d492734..4a36725 100644 --- a/lib/SQL/Translator/Schema/Constraint.pm +++ b/lib/SQL/Translator/Schema/Constraint.pm @@ -49,7 +49,7 @@ use base 'SQL::Translator::Schema::Object'; use vars qw($VERSION $TABLE_COUNT $VIEW_COUNT); -$VERSION = '1.99'; +$VERSION = '1.59'; my %VALID_CONSTRAINT_TYPE = ( PRIMARY_KEY, 1, diff --git a/lib/SQL/Translator/Schema/Field.pm b/lib/SQL/Translator/Schema/Field.pm index 42da7ae..1173a88 100644 --- a/lib/SQL/Translator/Schema/Field.pm +++ b/lib/SQL/Translator/Schema/Field.pm @@ -48,7 +48,7 @@ use base 'SQL::Translator::Schema::Object'; use vars qw($VERSION $TABLE_COUNT $VIEW_COUNT); -$VERSION = '1.99'; +$VERSION = '1.59'; # Stringify to our name, being careful not to pass any args through so we don't # accidentally set it to undef. We also have to tweak bool so the object is diff --git a/lib/SQL/Translator/Schema/Index.pm b/lib/SQL/Translator/Schema/Index.pm index 5498c14..7e04811 100644 --- a/lib/SQL/Translator/Schema/Index.pm +++ b/lib/SQL/Translator/Schema/Index.pm @@ -51,7 +51,7 @@ use base 'SQL::Translator::Schema::Object'; use vars qw($VERSION $TABLE_COUNT $VIEW_COUNT); -$VERSION = '1.99'; +$VERSION = '1.59'; my %VALID_INDEX_TYPE = ( UNIQUE => 1, diff --git a/lib/SQL/Translator/Schema/Object.pm b/lib/SQL/Translator/Schema/Object.pm index 98fe0a7..b58f16c 100644 --- a/lib/SQL/Translator/Schema/Object.pm +++ b/lib/SQL/Translator/Schema/Object.pm @@ -41,7 +41,7 @@ use Class::MakeMethods::Utility::Ref qw( ref_compare ); use vars qw[ $VERSION ]; -$VERSION = '1.99'; +$VERSION = '1.59'; =head1 Construction diff --git a/lib/SQL/Translator/Schema/Procedure.pm b/lib/SQL/Translator/Schema/Procedure.pm index 67ae296..d6d1dee 100644 --- a/lib/SQL/Translator/Schema/Procedure.pm +++ b/lib/SQL/Translator/Schema/Procedure.pm @@ -52,7 +52,7 @@ use base 'SQL::Translator::Schema::Object'; use vars qw($VERSION); -$VERSION = '1.99'; +$VERSION = '1.59'; # ---------------------------------------------------------------------- diff --git a/lib/SQL/Translator/Schema/Table.pm b/lib/SQL/Translator/Schema/Table.pm index c8efcff..fff4799 100644 --- a/lib/SQL/Translator/Schema/Table.pm +++ b/lib/SQL/Translator/Schema/Table.pm @@ -49,7 +49,7 @@ use base 'SQL::Translator::Schema::Object'; use vars qw( $VERSION $FIELD_ORDER ); -$VERSION = '1.99'; +$VERSION = '1.59'; # Stringify to our name, being careful not to pass any args through so we don't # accidentally set it to undef. We also have to tweak bool so the object is diff --git a/lib/SQL/Translator/Schema/Trigger.pm b/lib/SQL/Translator/Schema/Trigger.pm index ecb5080..e377d50 100644 --- a/lib/SQL/Translator/Schema/Trigger.pm +++ b/lib/SQL/Translator/Schema/Trigger.pm @@ -55,7 +55,7 @@ use Carp; use vars qw($VERSION $TABLE_COUNT $VIEW_COUNT); -$VERSION = '1.99'; +$VERSION = '1.59'; # ---------------------------------------------------------------------- diff --git a/lib/SQL/Translator/Schema/View.pm b/lib/SQL/Translator/Schema/View.pm index 0221f13..e21fcd2 100644 --- a/lib/SQL/Translator/Schema/View.pm +++ b/lib/SQL/Translator/Schema/View.pm @@ -48,7 +48,7 @@ use base 'SQL::Translator::Schema::Object'; use vars qw($VERSION $TABLE_COUNT $VIEW_COUNT); -$VERSION = '1.99'; +$VERSION = '1.59'; # ---------------------------------------------------------------------- diff --git a/lib/SQL/Translator/Utils.pm b/lib/SQL/Translator/Utils.pm index f3603f3..83cf6e9 100644 --- a/lib/SQL/Translator/Utils.pm +++ b/lib/SQL/Translator/Utils.pm @@ -26,7 +26,7 @@ use Digest::SHA1 qw( sha1_hex ); use Exporter; -$VERSION = '1.99'; +$VERSION = '1.59'; $DEFAULT_COMMENT = '-- '; @EXPORT_OK = qw( debug normalize_name header_comment parse_list_arg truncate_id_uniquely $DEFAULT_COMMENT parse_mysql_version diff --git a/lib/Test/SQL/Translator.pm b/lib/Test/SQL/Translator.pm index 7d14688..511b9b8 100644 --- a/lib/Test/SQL/Translator.pm +++ b/lib/Test/SQL/Translator.pm @@ -32,7 +32,7 @@ use warnings; use base qw(Exporter); use vars qw($VERSION @EXPORT @EXPORT_OK); -$VERSION = '1.99'; +$VERSION = '1.59'; @EXPORT = qw( schema_ok table_ok