diff options
author | Eric Wong <e@80x24.org> | 2021-03-28 09:01:24 +0000 |
---|---|---|
committer | Eric Wong <e@80x24.org> | 2021-03-28 23:01:37 +0000 |
commit | 80f4192574065106ae72a7a73ee0f02ebd86708a (patch) | |
tree | af6889740669aa8e05bdef4ddf932f562b3a444b /lib/PublicInbox/TestCommon.pm | |
parent | 8c8bd22ec8c74a3bf66a611a2a0c2d4d76a42ddb (diff) | |
download | public-inbox-80f4192574065106ae72a7a73ee0f02ebd86708a.tar.gz |
File::Temp only requires four 'X' characters (unlike mkstemp(3), which requires six). So only so only give it 4 to avoid an 80-column violation and maybe save metadata space on FSes.
Diffstat (limited to 'lib/PublicInbox/TestCommon.pm')
-rw-r--r-- | lib/PublicInbox/TestCommon.pm | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/lib/PublicInbox/TestCommon.pm b/lib/PublicInbox/TestCommon.pm index d36a63aa..d6e090dd 100644 --- a/lib/PublicInbox/TestCommon.pm +++ b/lib/PublicInbox/TestCommon.pm @@ -40,7 +40,7 @@ sub tmpdir (;$) { unless (defined $base) { ($base) = ($0 =~ m!\b([^/]+)\.[^\.]+\z!); } - my $tmpdir = File::Temp->newdir("pi-$base-$$-XXXXXX", TMPDIR => 1); + my $tmpdir = File::Temp->newdir("pi-$base-$$-XXXX", TMPDIR => 1); ($tmpdir->dirname, $tmpdir); } |