diff options
| author | Paul Buetow <paul@buetow.org> | 2012-06-24 15:24:42 +0200 |
|---|---|---|
| committer | Paul Buetow <paul@buetow.org> | 2012-06-24 15:24:42 +0200 |
| commit | bdfd7c92ecde366f85a512da02ae657133960b1f (patch) | |
| tree | ec31c0b659a22900e887c94b38e3113ddf4594b7 /lib/Loadbars/Main.pm | |
| parent | 93f2cfb231cefe6030557c6b1374a79cf5980175 (diff) | |
introduce net avg hotkeys
Diffstat (limited to 'lib/Loadbars/Main.pm')
| -rw-r--r-- | lib/Loadbars/Main.pm | 15 |
1 files changed, 13 insertions, 2 deletions
diff --git a/lib/Loadbars/Main.pm b/lib/Loadbars/Main.pm index e20f2bd..4dbe9f7 100644 --- a/lib/Loadbars/Main.pm +++ b/lib/Loadbars/Main.pm @@ -482,13 +482,24 @@ sub loop ($@) { } elsif ( $key_name eq 'a' ) { ++$C{cpuaverage}; - display_info "Set sample average to $C{cpuaverage}"; + display_info "Set sample cpu average to $C{cpuaverage}"; } elsif ( $key_name eq 'y' or $key_name eq 'z' ) { my $avg = $C{cpuaverage}; --$avg; $C{cpuaverage} = $avg > 1 ? $avg : 2; - display_info "Set sample cpuaverage to $C{cpuaverage}"; + display_info "Set sample cpu average to $C{cpuaverage}"; + + } + elsif ( $key_name eq 'd' ) { + ++$C{netaverage}; + display_info "Set sample net average to $C{netaverage}"; + } + elsif ( $key_name eq 'c' ) { + my $avg = $C{netaverage}; + --$avg; + $C{netaverage} = $avg > 1 ? $avg : 2; + display_info "Set sample net average to $C{netaverage}"; } elsif ( $key_name eq 's' ) { |