From mboxrd@z Thu Jan  1 00:00:00 1970
Return-Path: <normalperson@yhbt.net>
X-Spam-Checker-Version: SpamAssassin 3.4.0 (2014-02-07) on dcvr.yhbt.net
X-Spam-Level: 
X-Spam-ASN:  
X-Spam-Status: No, score=-4.7 required=3.0 tests=ALL_TRUSTED,AWL,BAYES_00,
	HEADER_FROM_DIFFERENT_DOMAINS,RP_MATCHES_RCVD shortcircuit=no
	autolearn=unavailable autolearn_force=no version=3.4.0
Received: from localhost (dcvr.yhbt.net [127.0.0.1])
	by dcvr.yhbt.net (Postfix) with ESMTP id 720F01F955
	for <meta@public-inbox.org>; Fri, 20 May 2016 22:38:15 +0000 (UTC)
From: Eric Wong <e@80x24.org>
To: meta@public-inbox.org
Subject: [PATCH] ssoma-replay: use TMPDIR for temporary path
Date: Fri, 20 May 2016 22:38:15 +0000
Message-Id: <20160520223815.14371-1-e@80x24.org>
List-Id: <meta@public-inbox.org>

Otherwise, tempfile() will use the current working directory,
which may not be writable.
---
 scripts/ssoma-replay | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/scripts/ssoma-replay b/scripts/ssoma-replay
index bfcea0a..91c121d 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>);