package DBIx::SchemaChecksum::Driver::SQLite;
use utf8;
# ABSTRACT: SQLite driver for DBIx::SchemaChecksum
use namespace::autoclean;
use Moose::Role;
around '_build_schemadump_table' => sub {
my $orig = shift;
my ($self,$schema,$table) = @_;
return
if ($table eq 'sqlite_temp_master' && $schema eq 'temp')
|| ($table eq 'sqlite_sequence' && $schema eq 'main')
|| ($table eq 'sqlite_master' && $schema eq 'main');
return $self->$orig($schema,$table);
};
1;
__END__
=pod
=head1 NAME
DBIx::SchemaChecksum::Driver::SQLite - SQLite driver for DBIx::SchemaChecksum
=head1 VERSION
version 1.001
=head1 AUTHORS
=over 4
=item *
Thomas Klausner <domm@cpan.org>
=item *
Maroš Kollár <maros@cpan.org>
=item *
Klaus Ita <koki@worstofall.com>
=back
=head1 COPYRIGHT AND LICENSE
This software is copyright (c) 2012 by Thomas Klausner, Maroš Kollár, Klaus Ita.
This is free software; you can redistribute it and/or modify it under
the same terms as the Perl 5 programming language system itself.
=cut