ViewVC Help
View File | Revision Log | Show Annotations | Download File
/cvs/AnyEvent/lib/AnyEvent.pm
(Generate patch)

Comparing AnyEvent/lib/AnyEvent.pm (file contents):
Revision 1.243 by root, Fri Jul 17 23:12:20 2009 UTC vs.
Revision 1.245 by root, Sat Jul 18 05:19:09 2009 UTC

1053 1053
1054BEGIN { AnyEvent::common_sense } 1054BEGIN { AnyEvent::common_sense }
1055 1055
1056use Carp (); 1056use Carp ();
1057 1057
1058our $VERSION = 4.83; 1058our $VERSION = 4.85;
1059our $MODEL; 1059our $MODEL;
1060 1060
1061our $AUTOLOAD; 1061our $AUTOLOAD;
1062our @ISA; 1062our @ISA;
1063 1063
1362 undef $SIG_TW 1362 undef $SIG_TW
1363 unless --$SIG_COUNT; 1363 unless --$SIG_COUNT;
1364 1364
1365 delete $SIG_CB{$signal}{$cb}; 1365 delete $SIG_CB{$signal}{$cb};
1366 1366
1367 $HAVE_ASYNC_INTERRUPT
1368 ? delete $SIG_ASY{$signal}
1367 # delete doesn't work with older perls - they then 1369 : # delete doesn't work with older perls - they then
1368 # print weird messages, or just unconditionally exit 1370 # print weird messages, or just unconditionally exit
1369 # instead of getting the default action. 1371 # instead of getting the default action.
1370 undef $SIG{$signal} 1372 undef $SIG{$signal}
1371 unless keys %{ $SIG_CB{$signal} }; 1373 unless keys %{ $SIG_CB{$signal} };
1372} 1374}
1373 1375
1374# default implementation for ->child 1376# default implementation for ->child
1375 1377
1566C<PERL_ANYEVENT_MODEL>. 1568C<PERL_ANYEVENT_MODEL>.
1567 1569
1568When set to C<2> or higher, cause AnyEvent to report to STDERR which event 1570When set to C<2> or higher, cause AnyEvent to report to STDERR which event
1569model it chooses. 1571model it chooses.
1570 1572
1573When set to C<8> or higher, then AnyEvent will report extra information on
1574which optional modules it loads and how it implements certain features.
1575
1571=item C<PERL_ANYEVENT_STRICT> 1576=item C<PERL_ANYEVENT_STRICT>
1572 1577
1573AnyEvent does not do much argument checking by default, as thorough 1578AnyEvent does not do much argument checking by default, as thorough
1574argument checking is very costly. Setting this variable to a true value 1579argument checking is very costly. Setting this variable to a true value
1575will cause AnyEvent to load C<AnyEvent::Strict> and then to thoroughly 1580will cause AnyEvent to load C<AnyEvent::Strict> and then to thoroughly
1651 1656
1652When neither C<ca_file> nor C<ca_path> was specified during 1657When neither C<ca_file> nor C<ca_path> was specified during
1653L<AnyEvent::TLS> context creation, and either of these environment 1658L<AnyEvent::TLS> context creation, and either of these environment
1654variables exist, they will be used to specify CA certificate locations 1659variables exist, they will be used to specify CA certificate locations
1655instead of a system-dependent default. 1660instead of a system-dependent default.
1661
1662=item C<PERL_ANYEVENT_AVOID_GUARD> and C<PERL_ANYEVENT_AVOID_ASYNC_INTERRUPT>
1663
1664When these are set to C<1>, then the respective modules are not
1665loaded. Mostly good for testing AnyEvent itself.
1656 1666
1657=back 1667=back
1658 1668
1659=head1 SUPPLYING YOUR OWN EVENT MODEL INTERFACE 1669=head1 SUPPLYING YOUR OWN EVENT MODEL INTERFACE
1660 1670

Diff Legend

Removed lines
+ Added lines
< Changed lines
> Changed lines