| … | … | ||
|---|---|---|---|
| 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 |