… | … | ||
---|---|---|---|
13 | my $self = bless { | 13 | my $self = bless { |
14 | slots => $_[0], | 14 | slots => $_[0], |
15 | lastspb => 0, | 15 | lastspb => 0, |
16 | avgspb => 0, | 16 | avgspb => 0, |
17 | }, $class; | 17 | }, $class; |
18 | $self->{reschedule} = EV::timer 10, 3, sub { $self->wake_next }; | 18 | $self->{reschedule} = AE::timer 10, 3, sub { $self->wake_next }; |
19 | $self; | 19 | $self; |
20 | } | 20 | } |
21 | 21 | ||
22 | sub start_transfer { | 22 | sub start_transfer { |
23 | my $self = shift; | 23 | my $self = shift; |
– | Removed lines |
+ | Added lines |
< | Changed lines |
> | Changed lines |