From 87f54530f027276afcb4178ebc38df26d9408290 Mon Sep 17 00:00:00 2001
From: Martin Mares <mj@ucw.cz>
Date: Fri, 29 Jun 2012 21:45:44 +0200
Subject: [PATCH] Update2: Avoid File::Temp->newdir(), as it requires too new
 Perl

---
 update2 | 5 ++---
 1 file changed, 2 insertions(+), 3 deletions(-)

diff --git a/update2 b/update2
index e27c462..933feaa 100755
--- a/update2
+++ b/update2
@@ -31,9 +31,8 @@ $ref =~ s{^refs/heads/}{} or exit 0;
 $old ne $new or exit 0;
 
 my $subj = '[' . $subject_prefix . ($ref eq 'master' ? '' : "/$ref") . ']';
-my $tmpdir = File::Temp->newdir() or die;
-my $outname = "$tmpdir/0";
-my $out = IO::File->new($outname, '>') or die;
+my $out = File::Temp->new() or die;
+my $outname = $out->filename;
 $out->autoflush(1);
 close STDOUT;
 open STDOUT, '>&', $out or die;
-- 
2.39.2