Added safty disabled patterns

ivanwills · Jul 30, 2016 · e9fe320 · e9fe320
1 parent 8fa284e
commit e9fe320
Showing 1 changed file with 1 addition and 1 deletion.
diff --git a/lib/VCS/Which.pm b/lib/VCS/Which.pm
@@ -61,7 +61,7 @@ sub get_systems {
 
         for my $file (@files) {
             my $module = $file;
-            $module =~ s{$dir/}{}xms;
+            $module =~ s{\Q$dir\E/}{}xms;
             $module =~ s{/}{::}gxms;
             $module =~ s{[.]pm$}{}xms;