Skip to content
Snippets Groups Projects
Commit bbba2501 authored by Robert Martin-Legene's avatar Robert Martin-Legene
Browse files

A veces NIST no contesta como deberian.

parent 6aa05372
No related branches found
No related tags found
No related merge requests found
......@@ -174,7 +174,7 @@ my $s = IO::Socket::INET->new(
if ( defined $s )
{
$s->recv(my $data, 8);
my $i = unpack('N', $data);
my $i = unpack('N', $data) || 0;
if ( $i > 0 )
{
# rfc868 offset (seconds from 1900-01-01 to 1970-01-01)
......
0% Loading or .
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment