From: Rafael Kitover <rkitover@cpan.org>
Date: Tue, 6 Sep 2011 07:44:10 +0000 (-0400)
Subject: fix defaults broken by last Pg defaults fix commit
X-Git-Tag: 0.07011~46
X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=commitdiff_plain;h=c99b3e2b33149b6b6c8db5735f263667f9d0f947;p=dbsrgits%2FDBIx-Class-Schema-Loader.git

fix defaults broken by last Pg defaults fix commit
---

diff --git a/lib/DBIx/Class/Schema/Loader/DBI/Component/QuotedDefault.pm b/lib/DBIx/Class/Schema/Loader/DBI/Component/QuotedDefault.pm
index 223b044..ecfd87b 100644
--- a/lib/DBIx/Class/Schema/Loader/DBI/Component/QuotedDefault.pm
+++ b/lib/DBIx/Class/Schema/Loader/DBI/Component/QuotedDefault.pm
@@ -38,7 +38,7 @@ sub _columns_info_for {
             elsif ($def =~ /^\((-?\d.*?)\)(?:::[\w\s]+)?\z/) {
                 $info->{default_value} = $1;
             }
-            elsif ($def =~ /^(\d.*?)(?:::[\w\s]+)?\z/) {
+            elsif ($def =~ /^(-?\d.*?)(?:::[\w\s]+)?\z/) {
                 $info->{default_value} = $1;
             }
             elsif ($def =~ /^NULL:?/i) {