use namespace::clean;
use DBIx::Class::Schema::Loader::Table ();
-our $VERSION = '0.07026';
+our $VERSION = '0.07036_01';
=head1 NAME
delete $info->{extra}{list};
- while ($column_type =~ /'((?:[^']* (?:''|\\')* [^']*)* [^\\'])',?/xg) {
+ while ($column_type =~ /'((?:[^']* (?:''|\\')* [^']*)* [^\\']?)',?/xg) {
my $el = $1;
$el =~ s/''/'/g;
push @{ $info->{extra}{list} }, $el;