This is a live mirror of the Perl 5 development currently hosted at https://github.com/perl/perl5
Fixup the setsockopt usage message; missing OPTVAL.
authorGisle Aas <gisle@activestate.com>
Thu, 8 Dec 2005 09:56:22 +0000 (09:56 +0000)
committerGisle Aas <gisle@activestate.com>
Thu, 8 Dec 2005 09:56:22 +0000 (09:56 +0000)
p4raw-id: //depot/perl@26300

ext/IO/lib/IO/Socket.pm

index 46504db..7e57bad 100644 (file)
@@ -249,7 +249,7 @@ sub shutdown {
 }
 
 sub setsockopt {
-    @_ == 4 or croak '$sock->setsockopt(LEVEL, OPTNAME)';
+    @_ == 4 or croak '$sock->setsockopt(LEVEL, OPTNAME, OPTVAL)';
     setsockopt($_[0],$_[1],$_[2],$_[3]);
 }