From: Eric Wong <e@80x24.org>
Date: Fri, 20 May 2016 22:35:16 +0000 (+0000)
Subject: ssoma-replay: use TMPDIR for temporary path
X-Git-Tag: v1.0.0~521
X-Git-Url: http://www.git.stargrave.org/?a=commitdiff_plain;h=fcfef9420b639214b325dd17f8a7ae151c21f627;p=public-inbox.git

ssoma-replay: use TMPDIR for temporary path

Otherwise, tempfile() will use the current working directory,
which may not be writable.
---

diff --git a/scripts/ssoma-replay b/scripts/ssoma-replay
index bfcea0a3..91c121dd 100755
--- a/scripts/ssoma-replay
+++ b/scripts/ssoma-replay
@@ -29,7 +29,7 @@ use strict;
 use Email::Simple;
 use URI::Escape qw/uri_escape_utf8/;
 use File::Temp qw/tempfile/;
-my ($fh, $filename) = tempfile('pi-replay-XXXXXXXX');
+my ($fh, $filename) = tempfile('ssoma-replay-XXXXXXXX', TMPDIR => 1);
 my $msg = eval {
 	local $/;
 	Email::Simple->new(<STDIN>);