use the untaint version otherwise we die with error 9

This commit is contained in:
Isaac Connor 2017-10-13 08:59:32 -04:00
parent 48cd4cb55c
commit 7f565e318f
1 changed files with 1 additions and 1 deletions

View File

@ -365,7 +365,7 @@ sub DiskUsage {
}
if ( ! defined $_[0]{DiskUsage} ) {
my $size = 0;
File::Find::find( sub { $size += -f $_ ? -s _ : 0 }, $_[0]->Path() );
File::Find::find( { wanted=>sub { $size += -f $_ ? -s _ : 0 }, untaint=>1 }, $_[0]->Path() );
$_[0]{DiskUsage} = $size;
}
}