Fix precedence problem in new Perl code.

I think this bit of commit 1f1cd9b5d didn't do quite what I meant :-(
This commit is contained in:
Tom Lane 2018-05-04 09:46:31 -04:00
parent 1cd2445c99
commit 59cb323053

View File

@ -356,7 +356,7 @@ sub RenameTempFile
if (-f $final_name
&& compare($temp_name, $final_name) == 0)
{
unlink $temp_name || die "unlink: $temp_name: $!";
unlink($temp_name) || die "unlink: $temp_name: $!";
}
else
{