From 048ec3d3f2b53a6a4a3d1215d40ed992944f83a3 Mon Sep 17 00:00:00 2001 From: Eelco Dolstra Date: Thu, 20 Nov 2014 11:45:01 +0100 Subject: 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. --- perl/lib/Nix/Utils.pm | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) (limited to 'perl') diff --git a/perl/lib/Nix/Utils.pm b/perl/lib/Nix/Utils.pm index 32fb0aafb808..392c45f2fffb 100644 --- a/perl/lib/Nix/Utils.pm +++ b/perl/lib/Nix/Utils.pm @@ -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"; } -- cgit 1.4.1