From: Matt S Trout Date: Thu, 24 Nov 2005 23:56:06 +0000 (+0000) Subject: Applied Brandon Black's patch to PK::Auto::Pg X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=commitdiff_plain;h=4ef9789adac43692633988b7195bc41d0ea59d21;p=dbsrgits%2FDBIx-Class-Historic.git Applied Brandon Black's patch to PK::Auto::Pg --- diff --git a/lib/DBIx/Class/PK/Auto/Pg.pm b/lib/DBIx/Class/PK/Auto/Pg.pm index 52185e5..ab401f8 100644 --- a/lib/DBIx/Class/PK/Auto/Pg.pm +++ b/lib/DBIx/Class/PK/Auto/Pg.pm @@ -27,7 +27,7 @@ sub get_autoinc_seq { while (my $foo = $sth->fetchrow_arrayref){ if(defined $foo->[12] && $foo->[12] =~ /^nextval/) { ($self->{_autoinc_seq}) = $foo->[12] =~ - m!^nextval\('"?([^"']+)"?'::text\)!; + m!^nextval\('"?([^"']+)"?'::(?:text|regclass)\)!; } } }