mirror of
https://github.com/postgres/postgres.git
synced 2025-06-05 00:02:04 -04:00
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:
parent
1cd2445c99
commit
59cb323053
@ -356,7 +356,7 @@ sub RenameTempFile
|
|||||||
if (-f $final_name
|
if (-f $final_name
|
||||||
&& compare($temp_name, $final_name) == 0)
|
&& compare($temp_name, $final_name) == 0)
|
||||||
{
|
{
|
||||||
unlink $temp_name || die "unlink: $temp_name: $!";
|
unlink($temp_name) || die "unlink: $temp_name: $!";
|
||||||
}
|
}
|
||||||
else
|
else
|
||||||
{
|
{
|
||||||
|
Loading…
x
Reference in New Issue
Block a user