[svn:DBD-Pg] r9794 - DBD-Pg/trunk

[turnstep]

Author: turnstep
Date: Tue Jul 24 07:35:30 2007
New Revision: 9794

Modified:
   DBD-Pg/trunk/Pg.pm

Log:
Slight regex change for last_insert_id, fixes bug #15918


Modified: DBD-Pg/trunk/Pg.pm
==============================================================================
--- DBD-Pg/trunk/Pg.pm  (original)
+++ DBD-Pg/trunk/Pg.pm  Tue Jul 24 07:35:30 2007
@@ -287,7 +287,7 @@
                        ## We have at least one with a default value. See if we 
can determine sequences
                        my @def;
                        for (@$info) {
-                               next unless $_->[2] =~ /^nextval\('([^']+)'::/o;
+                               next unless $_->[2] =~ 
/^nextval\(+'([^']+)'::/o;
                                push @$_, $1;
                                push @def, $_;
                        }