database/postgres
1
0
Fork 0
mirror of https://github.com/postgres/postgres.git synced 2025-06-23 14:01:44 +03:00
Code Activity

Fix bug in PostgresNode::query_hash's split() call.

Browse Source 
By default, Perl's split() function drops trailing empty fields,
which is not what we want here.  Oversight in commit fb093e4cb.
We'd managed to miss it thus far thanks to the very limited usage
of this function.

Discussion: https://postgr.es/m/14837.1499029831@sss.pgh.pa.us
This commit is contained in:
Tom Lane
2017-07-02 17:22:09 -04:00
parent 4e15387d2d
commit efdb4f29ba
1 changed files with 1 additions and 1 deletions
Download Patch File Download Diff File Expand all files Collapse all files

2
src/test/perl/PostgresNode.pm
View File

@ -1533,7 +1533,7 @@ sub query_hash
# #
my %val; my %val;
@val{@columns} = @val{@columns} =
$result ne '' ? split(qr/\|/, $result) : ('',) x scalar(@columns); $result ne '' ? split(qr/\|/, $result, -1) : ('',) x scalar(@columns);
return \%val; return \%val;
} }