… | |
… | |
264 | |
264 | |
265 | return $ob->reply (undef, sprintf "Output rate is presently %dbps.", $ob->contr->ns->max_rate / $cf::TICK) |
265 | return $ob->reply (undef, sprintf "Output rate is presently %dbps.", $ob->contr->ns->max_rate / $cf::TICK) |
266 | unless $arg > 0; |
266 | unless $arg > 0; |
267 | |
267 | |
268 | $ob->contr->ns->max_rate ($arg * $cf::TICK); |
268 | $ob->contr->ns->max_rate ($arg * $cf::TICK); |
269 | $ob->reply (undef, sprintf "Output rate now set to%dbps.", $ob->contr->ns->max_rate / $cf::TICK); |
269 | $ob->reply (undef, sprintf "Output rate now set to %dbps.", $ob->contr->ns->max_rate / $cf::TICK); |
270 | |
270 | |
271 | 1 |
271 | 1 |
272 | }; |
272 | }; |
273 | |
273 | |
274 | cf::register_command 'output-count' => sub { |
274 | cf::register_command 'output-count' => sub { |