… | … | ||
---|---|---|---|
19 | use Carp (); | 19 | use Carp (); |
20 | 20 | ||
21 | our $VERSION; | 21 | our $VERSION; |
22 | 22 | ||
23 | BEGIN { | 23 | BEGIN { |
24 | $VERSION = '0.9975'; | 24 | $VERSION = '0.9976'; |
25 | 25 | ||
26 | use XSLoader; | 26 | use XSLoader; |
27 | XSLoader::load "Deliantra::Client", $VERSION; | 27 | XSLoader::load "Deliantra::Client", $VERSION; |
28 | } | 28 | } |
29 | 29 | ||
… | … | ||
70 | 70 | ||
71 | $_ | 71 | $_ |
72 | } | 72 | } |
73 | 73 | ||
74 | sub socketpipe() { | 74 | sub socketpipe() { |
75 | socketpair my $fh1, my $fh2, Socket::AF_UNIX, Socket::SOCK_STREAM, Socket::PF_UNSPEC | 75 | socketpair my $fh1, my $fh2, &Socket::AF_UNIX, &Socket::SOCK_STREAM, &Socket::PF_UNSPEC |
76 | or die "cannot establish bidirectional pipe: $!\n"; | 76 | or die "cannot establish bidirectional pipe: $!\n"; |
77 | 77 | ||
78 | ($fh1, $fh2) | 78 | ($fh1, $fh2) |
79 | } | 79 | } |
80 | 80 |
– | Removed lines |
+ | Added lines |
< | Changed lines |
> | Changed lines |