Remove temporary files on exit

diff --git a/pristine-gz b/pristine-gz
index f26a822..67c287d 100755 (executable)
--- a/pristine-gz
+++ b/pristine-gz
@@ -129,7 +129,7 @@ sub doit {
 
 sub tempdir {
        return File::Temp::tempdir("pristine-gz.XXXXXXXXXX",
-               TMPDIR => 1, CLEANUP => 0);
+               TMPDIR => 1, CLEANUP => 1);
 }
 
 sub readgzip($) {