Fix bad operator

Spotted by Perl 5.20:

  Possible precedence issue with control flow operator at /usr/lib/perl5/site_perl/5.20.1/x86_64-linux-gnu-thread-multi/Nix/Utils.pm line 46.
This commit is contained in:
Eelco Dolstra 2014-11-20 11:45:01 +01:00
parent 05cddf0f5a
commit 048ec3d3f2
1 changed files with 1 additions and 1 deletions

View File

@ -43,5 +43,5 @@ sub readFile {
sub mkTempDir {
my ($name) = @_;
return tempdir("$name.XXXXXX", CLEANUP => 1, DIR => $ENV{"TMPDIR"} // $ENV{"XDG_RUNTIME_DIR"} // "/tmp")
or die "cannot create a temporary directory";
|| die "cannot create a temporary directory";
}