Skip to content

HTTPS clone URL

Subversion checkout URL

You can clone with HTTPS or Subversion.

Download ZIP
Browse files

Fix bug in parse_dir_array

Reported by Bill Carr
  • Loading branch information...
commit 81cf45687ffc8fca81353faceb3b77a2a9ef78f5 1 parent 4e79a63
@machack666 machack666 authored
Showing with 5 additions and 6 deletions.
  1. +5 −6 lib/Vend/Config.pm
View
11 lib/Vend/Config.pm
@@ -3932,15 +3932,14 @@ sub parse_dir_array {
my @dirs = grep /\S/, Text::ParseWords::shellwords($value);
foreach my $dir (@dirs) {
- my $val;
- unless (allowed_file($dir)) {
+ unless (allowed_file($dir)) {
config_error('Path %s not allowed in %s directive',
$dir, $var);
}
- $val = "$C->{VendRoot}/$dir"
- unless file_name_is_absolute($val);
- $val =~ s./+$..;
- push @$c, $val;
+ $dir = "$C->{VendRoot}/$dir"
+ unless file_name_is_absolute($dir);
+ $dir =~ s./+$..;
+ push @$c, $dir;
}
return $c;
Please sign in to comment.
Something went wrong with that request. Please try again.