mirror of
https://git.postgresql.org/git/postgresql.git
synced 2024-10-03 00:16:50 +02: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:
parent
fadac33bb8
commit
d4596a20d0
@ -504,6 +504,7 @@ if ($? == 0)
|
|||||||
if ($Config{ivsize} == 8)
|
if ($Config{ivsize} == 8)
|
||||||
{
|
{
|
||||||
$serialno =~ s/^serial=//;
|
$serialno =~ s/^serial=//;
|
||||||
|
$serialno =~ s/\s+//g;
|
||||||
$serialno = hex($serialno);
|
$serialno = hex($serialno);
|
||||||
}
|
}
|
||||||
else
|
else
|
||||||
|
Loading…
Reference in New Issue
Block a user