Skip to content
Browse files

Fix regexp for file extensions

  • Loading branch information...
1 parent e140e27 commit c301b353e657ac07a48a619865bcd0ad648495e0 @dgl committed Mar 31, 2012
Showing with 1 addition and 1 deletion.
  1. +1 −1 lib/WWW/CPANGrep/Search.pm
View
2 lib/WWW/CPANGrep/Search.pm
@@ -51,7 +51,7 @@ sub _parse_search {
file => sub {
my($file, $type) = @_;
# Shortcut for .pm -> \.(?i:pm)$
- $file = '\\(?i:' . $file . ')$' if $file =~ /^\.\w+$/;
+ $file = '(?i:\\' . $file . ')$' if $file =~ /^\.\w+$/;
{ type => "file", re => _re2_compile($file), negate => $type eq '-' }
},
dist => sub {

0 comments on commit c301b35

Please sign in to comment.
Something went wrong with that request. Please try again.