… | |
… | |
230 | ["other queue", $queue_index], |
230 | ["other queue", $queue_index], |
231 | ) { |
231 | ) { |
232 | my ($name, $queue) = @$_; |
232 | my ($name, $queue) = @$_; |
233 | my @waiters = $queue->waiters; |
233 | my @waiters = $queue->waiters; |
234 | if (@waiters) { |
234 | if (@waiters) { |
235 | $content .= "<li>$name<br />".(scalar @waiters)." client(s)"; |
235 | $content .= "<li>$name<br />".(scalar @waiters)." client(s); $queue->{started} downloads started;"; |
236 | |
236 | |
237 | $content .= "<p>Waiting time until download starts, estimated:<ul>"; |
237 | $content .= "<p>Waiting time until download starts, estimated:<ul>"; |
238 | for ( |
238 | for ( |
239 | ["by most recently started transfer", $queue->{lastspb}], |
239 | ["by most recently started transfer", $queue->{lastspb}], |
240 | ["by queue average", $queue->{avgspb}], |
240 | ["by queue average", $queue->{avgspb}], |