From: Peter Rabbitson <ribasushi@cpan.org>
Date: Mon, 4 May 2015 13:44:00 +0000 (+0200)
Subject: (optdeps) Explicitly force group names to lower-case (for now)
X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=commitdiff_plain;h=75625284e2d370106294342b7dbc7f77f792dcfa;p=dbsrgits%2FDBIx-Class-Historic.git

(optdeps) Explicitly force group names to lower-case (for now)
---

diff --git a/lib/DBIx/Class/Optional/Dependencies.pm b/lib/DBIx/Class/Optional/Dependencies.pm
index 600a48e..425a3a1 100644
--- a/lib/DBIx/Class/Optional/Dependencies.pm
+++ b/lib/DBIx/Class/Optional/Dependencies.pm
@@ -867,7 +867,7 @@ sub __envvar_group_desc {
   join '/', @res;
 }
 
-my $groupname_re = qr/ [A-Z_a-z][0-9A-Z_a-z]* /x;
+my $groupname_re = qr/ [a-z_] [0-9_a-z]* /x;
 my $modname_re = qr/ [A-Z_a-z] [0-9A-Z_a-z]* (?:::[0-9A-Z_a-z]+)* /x;
 my $modver_re = qr/ [0-9]+ (?: \. [0-9]+ )? /x;