Description: die if perltidy.ERR and other temporary files cannot be unlinked
Origin: Upstream, Cherrypicked from 20170521.
Author: Don Armstrong <don@debian.org>, Steve Hancock
-diff --git a/lib/Perl/Tidy.pm b/lib/Perl/Tidy.pm
-index 2b0df0e..edcec6d 100644
--- a/lib/Perl/Tidy.pm
+++ b/lib/Perl/Tidy.pm
-@@ -3692,7 +3702,10 @@ sub do_syntax_check {
+@@ -3643,7 +3643,10 @@
# now wish for luck...
my $msg = qx/perl $flags $quoted_stream_filename $error_redirection/;
return $stream_filename, $msg;
}
-@@ -4128,7 +4143,11 @@ sub new {
+@@ -4074,7 +4077,11 @@
# remove any old error output file if we might write a new one
unless ( $fh_warnings || ref($warning_file) ) {