~ubuntu-branches/ubuntu/trusty/libanyevent-perl/trusty

« back to all changes in this revision

Viewing changes to lib/AnyEvent/Handle.pm

  • Committer: Bazaar Package Importer
  • Author(s): gregor herrmann
  • Date: 2010-06-12 15:58:26 UTC
  • mfrom: (1.4.3 upstream)
  • Revision ID: james.westby@ubuntu.com-20100612155826-lxxo9c1hbiw771wc
Tags: 5.271-1
New upstream release.

Show diffs side-by-side

added added

removed removed

Lines of Context:
538
538
   # with AnyEvent::Handle, do them a favour.
539
539
   my $type = getsockopt $self->{fh}, Socket::SOL_SOCKET (), Socket::SO_TYPE ();
540
540
   Carp::croak "AnyEvent::Handle: only stream sockets supported, anything else will NOT work!"
541
 
      if Socket::SOCK_STREAM != (unpack "I", $type) && defined $type;
 
541
      if Socket::SOCK_STREAM () != (unpack "I", $type) && defined $type;
542
542
 
543
543
   AnyEvent::Util::fh_nonblocking $self->{fh}, 1;
544
544