use the untaint version otherwise we die with error 9

This commit is contained in:
Isaac Connor committed 2017-10-13 08:59:32 -04:00
1 parent 48cd4cb55c
commit 7f565e318f
1 file changed
+1 -1
+1 -1
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;
}
}