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-d78f3d33393fpull/27/merge
parent
f46f78995e
commit
1ae705ab0e
|
@ -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 ) );
|
||||
|
|
Loading…
Reference in New Issue