X-Git-Url: https://git.donarmstrong.com/?p=perltidy.git;a=blobdiff_plain;f=debian%2Fpatches%2Ffix_insecure_tmpnam_usage_740670;h=867909f1b2152b06b5c9dbd262525c03a1099e11;hp=0d3b265ec760f9d45acd86d4c20a080ea1497036;hb=9ae67d80e3ea9c1176b63328e6e6a72d7e86efb2;hpb=4862e2b1f02adca8d5d24886268178b8635a9140 diff --git a/debian/patches/fix_insecure_tmpnam_usage_740670 b/debian/patches/fix_insecure_tmpnam_usage_740670 index 0d3b265..867909f 100644 --- a/debian/patches/fix_insecure_tmpnam_usage_740670 +++ b/debian/patches/fix_insecure_tmpnam_usage_740670 @@ -74,7 +74,7 @@ Last-Update: 2010-03-29 - $tmpfile = Perl::Tidy::make_temporary_filename(); - } - my $fh_tmp = IO::File->new( $tmpfile, 'w' ); -+ my ($fh_temp,$tempfile) = tempfile(); ++ my ($fh_tmp,$tmpfile) = tempfile(); unless ($fh_tmp) { Perl::Tidy::Warn "unable to open temporary file $tmpfile; cannot use pod2html\n";