… | … | ||
---|---|---|---|
136 | 136 | ||
137 | $interval = 0.4 if $interval < 0.4; | 137 | $interval = 0.4 if $interval < 0.4; |
138 | 138 | ||
139 | my @endpoints; | 139 | my @endpoints; |
140 | 140 | ||
141 | $self->{connect_w} = AE::timer rand, $interval, sub { | 141 | $self->{connect_w} = AE::timer 0.050 * rand, $interval * (0.9 + 0.1 * rand), sub { |
142 | @endpoints = @addresses | 142 | @endpoints = @addresses |
143 | unless @endpoints; | 143 | unless @endpoints; |
144 | 144 | ||
145 | my $endpoint = shift @endpoints; | 145 | my $endpoint = shift @endpoints; |
146 | 146 |
– | Removed lines |
+ | Added lines |
< | Changed lines |
> | Changed lines |