use strict;
use warnings;
-use vars qw[ $VERSION $DEBUG ];
-$VERSION = '1.59';
+our $DEBUG;
+our $VERSION = '1.59';
$DEBUG = 1 unless defined $DEBUG;
use SQL::Translator::Schema::Constants;
};
#
- # Primary key may have a differenct accessor method name
+ # Primary key may have a different accessor method name
#
# if ( my $constraint = $table->primary_key ) {
# my $field = ( $constraint->fields )[0];