fix double my in DeleteExportedFiles

This commit is contained in:
Colin Kuskie 2008-08-31 00:09:59 +00:00
parent 726bd5ee05
commit 63a80e00ff

View file

@ -101,7 +101,6 @@ sub execute {
goto pause if (time - $time > $ttl);
}
my $ttl = $self->getTTL;
while (defined(my $dirname = shift @dirs)) {
my $cdirname = $self->_canonExportPath($dirname);
rmdir $cdirname or $self->session->errorHandler->warn("DeleteExportedFiles: couldn't rmdir $dirname: $!"), next;