… | |
… | |
68 | |
68 | |
69 | no warnings; |
69 | no warnings; |
70 | use strict 'vars'; |
70 | use strict 'vars'; |
71 | use Carp; |
71 | use Carp; |
72 | |
72 | |
73 | our $VERSION = '1.0'; |
73 | our $VERSION = '1.02'; |
74 | our $MODEL; |
74 | our $MODEL; |
75 | |
75 | |
76 | our $AUTOLOAD; |
76 | our $AUTOLOAD; |
77 | our @ISA; |
77 | our @ISA; |
78 | |
78 | |
… | |
… | |
135 | |
135 | |
136 | =head1 SUPPLYING YOUR OWN EVENT MODEL INTERFACE |
136 | =head1 SUPPLYING YOUR OWN EVENT MODEL INTERFACE |
137 | |
137 | |
138 | If you need to support another event library which isn't directly |
138 | If you need to support another event library which isn't directly |
139 | supported by AnyEvent, you can supply your own interface to it by |
139 | supported by AnyEvent, you can supply your own interface to it by |
140 | pushing, before the first watch gets created, the package name of |
140 | pushing, before the first watcher gets created, the package name of |
141 | the event module and the package name of the interface to use onto |
141 | the event module and the package name of the interface to use onto |
142 | C<@AnyEvent::REGISTRY>. You can do that before and even without loading |
142 | C<@AnyEvent::REGISTRY>. You can do that before and even without loading |
143 | AnyEvent. |
143 | AnyEvent. |
144 | |
144 | |
145 | Example: |
145 | Example: |