Re-add cleanup, since CLEANUP only works for dirs

omega · Oct 27, 2011 · 7d6360b · 7d6360b
1 parent 288873a
commit 7d6360b
Showing 1 changed file with 2 additions and 1 deletion.
diff --git a/lib/Startsiden/Test/JavaScript.pm b/lib/Startsiden/Test/JavaScript.pm
@@ -69,14 +69,15 @@ sub js_test {
         push(@argv, $content);
     } elsif ($content) {
         # Need to write out the content to a temp-file
-        my ($fh, $file) = tempfile( DIR => 't/', SUFFIX => '.html', CLEANUP => 1 );
+        my ($fh, $file) = tempfile( DIR => 't/', SUFFIX => '.html' );
         print $fh $content;
         close $fh;
         # now to pass that to the JS test
         push(@argv, $file);
         $f = $file;
     }
     _run_rhino(@argv);
+    unlink($f) if $f;
 }
 
 sub _run_psgi {