diff options
Diffstat (limited to 'loadbars.pl')
| -rwxr-xr-x | loadbars.pl | 9 |
1 files changed, 6 insertions, 3 deletions
diff --git a/loadbars.pl b/loadbars.pl index 094bb4c..b167a76 100755 --- a/loadbars.pl +++ b/loadbars.pl @@ -65,7 +65,7 @@ my %C : shared; factor => 1, displaytxt => 1, displaytxthost => 0, - displaypeak => 0, + togglepeak => 0, inter => 0.1, samples => 1000, sshopts => '', @@ -275,7 +275,7 @@ sub main_loop ($@) { $displayinfo = 'Hotkeys help printed on terminal stdout'; } elsif ($key_name eq 'p') { - $C{displaypeak} = !$C{displaypeak}; + $C{togglepeak} = !$C{togglepeak}; $displayinfo = 'Toggled peak display'; } elsif ($key_name eq 't') { @@ -422,7 +422,7 @@ sub main_loop ($@) { $app->fill($rect_iowait, Loadbars::BLACK); $app->fill($rect_nice, Loadbars::GREEN); - if ($C{displaypeak}) { + if ($C{togglepeak}) { my %maxheights = map { $_ => defined $cpumax->{$_} ? $cpumax->{$_} * ($C{height}/100) : 1 @@ -597,6 +597,9 @@ END toggletxt => { menupos => 22, help => 'Toggle text display (0 or 1)', mode => 7, type => 'i' }, toggletxt_hot => { menupos => 23, cmd => 't', help => 'Toggle text display', mode => 1 }, + togglepeak => { menupos => 22, help => 'Toggle peak display (0 or 1)', mode => 7, type => 'i' }, + togglepeak_hot => { menupos => 23, cmd => 'p', help => 'Toggle peak display', mode => 1 }, + width => { menupos => 24, help => 'Set windows width', mode => 6, type => 'i' }, ); |