diff options
author | Eric Wong <e@80x24.org> | 2016-03-03 09:07:40 +0000 |
---|---|---|
committer | Eric Wong <e@80x24.org> | 2016-03-03 09:07:51 +0000 |
commit | 5cddfa50765d59157e15488c235fe01202db0972 (patch) | |
tree | 87d0c30c70a3c2b0d46eac057f0f84c07ddf3a62 /t/httpd-corner.t | |
parent | e6b8bee29611b86b5672b8b48ecf7fcd86ea41fd (diff) | |
download | public-inbox-5cddfa50765d59157e15488c235fe01202db0972.tar.gz |
This should make identifiying leftover directories due to SIGKILL-ed tests easier.
Diffstat (limited to 't/httpd-corner.t')
-rw-r--r-- | t/httpd-corner.t | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/t/httpd-corner.t b/t/httpd-corner.t index 40692086..e73ebd5e 100644 --- a/t/httpd-corner.t +++ b/t/httpd-corner.t @@ -19,7 +19,7 @@ use IO::Socket; use Fcntl qw(FD_CLOEXEC F_SETFD F_GETFD :seek); use Socket qw(SO_KEEPALIVE IPPROTO_TCP TCP_NODELAY); use POSIX qw(dup2 mkfifo :sys_wait_h); -my $tmpdir = tempdir(CLEANUP => 1); +my $tmpdir = tempdir('httpd-corner-XXXXXX', TMPDIR => 1, CLEANUP => 1); my $fifo = "$tmpdir/fifo"; ok(defined mkfifo($fifo, 0777), 'created FIFO'); my $err = "$tmpdir/stderr.log"; |