1
0
mirror of https://github.com/postgres/postgres.git synced 2025-08-06 18:42:54 +03:00

Silence perl complaint in ssl test

Perl's hex() function complains if its argument contains trailing white
space (or in fact anything other than hex digits), so remove the
offending text.
This commit is contained in:
Andrew Dunstan
2021-12-05 11:50:03 -05:00
parent fadac33bb8
commit d4596a20d0

View File

@@ -504,6 +504,7 @@ if ($? == 0)
if ($Config{ivsize} == 8)
{
$serialno =~ s/^serial=//;
$serialno =~ s/\s+//g;
$serialno = hex($serialno);
}
else