X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=blobdiff_plain;f=lib%2FDBIx%2FClass%2FSQLAHacks%2FSQLite.pm;h=937cbf6ac7731da41b33b2af309c3ec527102835;hb=31073ac79e22ae0f977c7e0fc4e9857d250143c4;hp=e26078629f872c020af1506479bbb59d93771606;hpb=a6b68a60b376e918a6058f37cb1115ba3163a59b;p=dbsrgits%2FDBIx-Class.git diff --git a/lib/DBIx/Class/SQLAHacks/SQLite.pm b/lib/DBIx/Class/SQLAHacks/SQLite.pm index e260786..937cbf6 100644 --- a/lib/DBIx/Class/SQLAHacks/SQLite.pm +++ b/lib/DBIx/Class/SQLAHacks/SQLite.pm @@ -1,21 +1,6 @@ package # Hide from PAUSE DBIx::Class::SQLAHacks::SQLite; -use base qw( DBIx::Class::SQLAHacks ); -use Carp::Clan qw/^DBIx::Class|^SQL::Abstract/; - -# -# SQLite does not understand SELECT ... FOR UPDATE -# Disable it here -# -sub _parse_rs_attrs { - my ($self, $attrs) = @_; - - return $self->SUPER::_parse_rs_attrs ($attrs) - if ref $attrs ne 'HASH'; - - local $attrs->{for}; - return $self->SUPER::_parse_rs_attrs ($attrs); -} +use base qw( DBIx::Class::SQLMaker::SQLite ); 1;