… | |
… | |
1293 | # "new" API, currently only emulation of it |
1293 | # "new" API, currently only emulation of it |
1294 | ############################################################################# |
1294 | ############################################################################# |
1295 | |
1295 | |
1296 | package AE; |
1296 | package AE; |
1297 | |
1297 | |
|
|
1298 | our $VERSION = $AnyEvent::VERSION; |
|
|
1299 | |
1298 | sub io($$$) { |
1300 | sub io($$$) { |
1299 | AnyEvent->io (fh => $_[0], poll => $_[1] ? "w" : "r", cb => $_[2]) |
1301 | AnyEvent->io (fh => $_[0], poll => $_[1] ? "w" : "r", cb => $_[2]) |
1300 | } |
1302 | } |
1301 | |
1303 | |
1302 | sub timer($$$) { |
1304 | sub timer($$$) { |