}
close $file or die $!;
+# New names ...
+if (defined $battery{ENERGY_NOW}) {
+ $battery{CHARGE_NOW} = $battery{ENERGY_NOW};
+ $battery{CHARGE_FULL} = $battery{ENERGY_FULL};
+}
+
my $charge = int($battery{CHARGE_NOW} / $battery{CHARGE_FULL} * 100);
# GNU screen mode with colors: 0-20 red, 20-40 yellow, 40-100 green.