Permalink
Browse files

update regexp so that any dots inside the given path cannot match here

  • Loading branch information...
1 parent 54f95f8 commit 125a4584e5b71e19f8cefacb9cafb84f14c258f9 @shyouhei shyouhei committed May 10, 2013
Showing with 1 addition and 1 deletion.
  1. +1 −1 lib/App/envfile.pm
View
@@ -53,7 +53,7 @@ sub parse_envfile {
sub _try_any_config_file {
my ($self, $file) = @_;
- my ($ext) = $file =~ /\.(\w+)/;
+ my ($ext) = $file =~ /\.(\w+)$/;
if (my $type = $EXTENTIONS_MAP->{lc($ext || '')}) {
my $env;
if ($type eq 'Perl') {

0 comments on commit 125a458

Please sign in to comment.