diff options
Diffstat (limited to 'ext/IO/lib/IO/Socket')
| -rw-r--r-- | ext/IO/lib/IO/Socket/INET.pm | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/ext/IO/lib/IO/Socket/INET.pm b/ext/IO/lib/IO/Socket/INET.pm index 8f1845b248..139163be55 100644 --- a/ext/IO/lib/IO/Socket/INET.pm +++ b/ext/IO/lib/IO/Socket/INET.pm @@ -42,7 +42,7 @@ sub _sock_info { if(defined $addr && $addr =~ s,:([\w\(\)/]+)$,,); if(defined $proto && $proto =~ /\D/) { - if(@proto = getprotobyname($proto) { + if(@proto = getprotobyname($proto)) { $proto = $proto[2] || undef; } else { |