diff --git a/scripts/ZoneMinder/lib/ZoneMinder/Event.pm b/scripts/ZoneMinder/lib/ZoneMinder/Event.pm
index 67b7a53bc..fbb249773 100644
--- a/scripts/ZoneMinder/lib/ZoneMinder/Event.pm
+++ b/scripts/ZoneMinder/lib/ZoneMinder/Event.pm
@@ -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;
   }
 }