diff options
author | Frédéric Buclin <LpSolit@gmail.com> | 2016-02-29 19:34:34 +0100 |
---|---|---|
committer | Frédéric Buclin <LpSolit@gmail.com> | 2016-02-29 19:34:34 +0100 |
commit | 86fb87f1a65a17e7a86fe71b06d57767b0b3ea3b (patch) | |
tree | 85acb4dc08ab6ff6247c2aafca88ac7bb3acd2e0 /Bugzilla/DB/Schema/Mysql.pm | |
parent | 438d57d65626d068ca0f28de46410ebecc9a9b57 (diff) | |
download | bugzilla-86fb87f1a65a17e7a86fe71b06d57767b0b3ea3b.tar.gz bugzilla-86fb87f1a65a17e7a86fe71b06d57767b0b3ea3b.tar.xz |
Bug 1136137: Require Perl 5.14
r=dkl
Diffstat (limited to 'Bugzilla/DB/Schema/Mysql.pm')
-rw-r--r-- | Bugzilla/DB/Schema/Mysql.pm | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/Bugzilla/DB/Schema/Mysql.pm b/Bugzilla/DB/Schema/Mysql.pm index db01e971d..59066bdc4 100644 --- a/Bugzilla/DB/Schema/Mysql.pm +++ b/Bugzilla/DB/Schema/Mysql.pm @@ -13,7 +13,7 @@ package Bugzilla::DB::Schema::Mysql; # ############################################################################### -use 5.10.1; +use 5.14.0; use strict; use warnings; @@ -311,7 +311,7 @@ sub column_info_to_column { $default = 0 if $default =~ /^0\.0+$/; # If we're not a number, we're a string and need to be # quoted. - $default = $dbh->quote($default) if !($default =~ /^(-)?(\d+)(.\d+)?$/); + $default = $dbh->quote($default) if !($default =~ /^(-)?(\d+)(\.\d+)?$/a); $column->{DEFAULT} = $default; } } |