diff options
| author | Paul Buetow <paul@buetow.org> | 2012-02-04 23:32:42 +0100 |
|---|---|---|
| committer | Paul Buetow <paul@buetow.org> | 2012-02-04 23:32:42 +0100 |
| commit | ae3119fcbad12751dd1fee051dd965a6893e79df (patch) | |
| tree | 8e1c02df126c518db0da000ea075f5a31bed3576 | |
| parent | 703384d5d5e9373aacb9c4625793940de8e8bab9 (diff) | |
fix showcores option
| -rwxr-xr-x | loadbars | 4 |
1 files changed, 2 insertions, 2 deletions
@@ -83,7 +83,7 @@ my %I : shared; ); %I = ( - cpuregexp => 'cpu ', + cpuregexp => 'cpu', showtextoff => 0, ); @@ -94,7 +94,7 @@ sub debugsay (@) { say "Loadbars::DEBUG: $_" for @_; return undef } sub sum (@) { my $sum = 0; $sum += $_ for @_; return $sum } sub null ($) { defined $_[0] ? $_[0] : 0 } sub notnull ($) { $_[0] != 0 ? $_[0] : 1 } -sub set_showcores_regexp () { $I{cpuregexp} = $I{showcores} ? 'cpu' : 'cpu ' } +sub set_showcores_regexp () { $I{cpuregexp} = $C{showcores} ? 'cpu' : 'cpu ' } sub error ($) { die shift, "\n" } sub display_info ($) { say "==> " . shift } sub display_warn ($) { say "!!! " . shift } |
