diff options
Diffstat (limited to 'src/test/perl/PostgresNode.pm')
| -rw-r--r-- | src/test/perl/PostgresNode.pm | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/src/test/perl/PostgresNode.pm b/src/test/perl/PostgresNode.pm index 4346423a0df..bb2f39e5089 100644 --- a/src/test/perl/PostgresNode.pm +++ b/src/test/perl/PostgresNode.pm @@ -1533,7 +1533,7 @@ sub query_hash # my %val; @val{@columns} = - $result ne '' ? split(qr/\|/, $result) : ('',) x scalar(@columns); + $result ne '' ? split(qr/\|/, $result, -1) : ('',) x scalar(@columns); return \%val; } |