use Moo;
our ( $DEFAULT_SUB, $DEBUG, $ERROR );
-our $VERSION = '0.11020';
+our $VERSION = '0.11023_02';
+$VERSION =~ tr/_//d;
$DEBUG = 0 unless defined $DEBUG;
$ERROR = "";
next;
}
else {
- __PACKAGE__->debug("Adding $filt filter. Args:".Dumper(\@args)."\n");
+ __PACKAGE__->debug("Adding $filt filter. Args:".Dumper(\@args)."\n") if __PACKAGE__->debugging;
$filt = _load_sub("$filt\::filter", "SQL::Translator::Filter")
|| throw(__PACKAGE__->error);
push @filters, [$filt,@args];
return $self->error($msg);
}
}
- $self->debug("Schema =\n", Dumper($self->schema), "\n");
+ $self->debug("Schema =\n", Dumper($self->schema), "\n") if $self->debugging;;
# Validate the schema if asked to.
if ($self->validate) {