Now removes any old images file, not just wap ones.

git-svn-id: http://svn.zoneminder.com/svn/zm/trunk@1051 e3e1d417-86f3-4887-817a-d78f3d33393f
pull/27/merge
stan 2004-05-05 09:08:47 +00:00
parent f46f78995e
commit 1ae705ab0e
1 changed files with 3 additions and 3 deletions

View File

@ -289,10 +289,10 @@ do
}
}
# Now delete any old wap image files
if ( my @old_files = grep { -M > $max_image_age } <$image_path/*-wap-*.{jpg,gif,wbmp}> )
# Now delete any old image files
if ( my @old_files = grep { -M > $max_image_age } <$image_path/*.{jpg,gif,wbmp}> )
{
print( "Deleting ".int(@old_files)." old wap images\n" );
print( "Deleting ".int(@old_files)." old images\n" );
my $untainted_old_files = join( ";", @old_files );
( $untainted_old_files ) = ( $untainted_old_files =~ /^(.*)$/ );
unlink( split( ";", $untainted_old_files ) );