[project @ 2002-10-06 22:54:48 by cjwatson]

[debbugs.git] / scripts / processall.in

diff --git a/scripts/processall.in b/scripts/processall.in
index 2602189533924f817af2fd78f4a252314426dd43..745ad50232edc3532ef9db4771ac9616cb4cdfbb 100755 (executable)
--- a/scripts/processall.in
+++ b/scripts/processall.in
@@ -1,5 +1,5 @@
 #!/usr/bin/perl
-# $Id: processall.in,v 1.7 2001/08/16 07:20:18 doogie Exp $
+# $Id: processall.in,v 1.8 2002/10/06 22:54:48 cjwatson Exp $
 #
 # Usage: processall
 #
@@ -15,6 +15,8 @@ require "$config_path/config";
 require "$lib_path/errorlib";
 $ENV{'PATH'} = $lib_path.':'.$ENV{'PATH'};
 
+use File::Path;
+
 chdir( "$gSpoolDir" ) || die 'chdir spool: $!\n';
 push( @INC, "$lib_path" );
 
@@ -64,6 +66,7 @@ for (;;) {
         print(STDERR "$id: process failed ($status $!) - now in [PG]$id\n") || die $!;
     }
     print(STDOUT " done\n") || die $!;
+    rmtree("$gSpoolDir/mime.tmp",0,1);
     $ndone++;
 }
 &unfilelock;