indentation cleanup
This commit is contained in:
@@ -71,24 +71,24 @@ while(1) {
|
||||
}
|
||||
|
||||
if ($shoot == 1) {
|
||||
$a->[0]->{'full_text'} = $title;
|
||||
$a->[2]->{'full_text'} = $uptime;
|
||||
$a->[3]->{'full_text'} = $la;
|
||||
$a->[4]->{'full_text'} = $charge[0];
|
||||
$a->[4]->{'color'} = $charge[1];
|
||||
$a->[5]->{'full_text'} = $time;
|
||||
my $json = JSON::PP->new;
|
||||
$json = $json->ascii(0);
|
||||
$json = $json->utf8(0);
|
||||
$json = $json->allow_unknown (1);
|
||||
$json = $json->canonical(1);
|
||||
$json = $json->space_before(0);
|
||||
$json = $json->space_after(0);
|
||||
$json = $json->indent(0);
|
||||
my $str = $json->encode($a);
|
||||
undef $json;
|
||||
$a->[0]->{'full_text'} = $title;
|
||||
$a->[2]->{'full_text'} = $uptime;
|
||||
$a->[3]->{'full_text'} = $la;
|
||||
$a->[4]->{'full_text'} = $charge[0];
|
||||
$a->[4]->{'color'} = $charge[1];
|
||||
$a->[5]->{'full_text'} = $time;
|
||||
my $json = JSON::PP->new;
|
||||
$json = $json->ascii(0);
|
||||
$json = $json->utf8(0);
|
||||
$json = $json->allow_unknown (1);
|
||||
$json = $json->canonical(1);
|
||||
$json = $json->space_before(0);
|
||||
$json = $json->space_after(0);
|
||||
$json = $json->indent(0);
|
||||
my $str = $json->encode($a);
|
||||
undef $json;
|
||||
|
||||
syswrite STDOUT, $str . ",\n";
|
||||
syswrite STDOUT, $str . ",\n";
|
||||
|
||||
undef $str;
|
||||
$shoot = 0;
|
||||
@@ -220,7 +220,7 @@ sub getbatterychargestr1() {
|
||||
undef $current_charge; undef $full_charge;
|
||||
}
|
||||
|
||||
undef $P;
|
||||
undef $P;
|
||||
}
|
||||
|
||||
my @z = ($str, '#555555');
|
||||
|
||||
Reference in New Issue
Block a user