Report critical battery errors

* lisp/battery.el (battery-pmset): Report critical battery
errors (bug#18157).
This commit is contained in:
Marcin Borkowski 2016-02-20 18:33:48 +11:00 committed by Lars Ingebrigtsen
parent d675db943e
commit c9bccf72cb

View file

@ -628,12 +628,12 @@ The following %-sequences are provided:
(cond ((looking-at "; charging")
(setq battery-status "charging"
battery-status-symbol "+"))
((< (string-to-number load-percentage) battery-load-low)
(setq battery-status "low"
battery-status-symbol "-"))
((< (string-to-number load-percentage) battery-load-critical)
(setq battery-status "critical"
battery-status-symbol "!"))
((< (string-to-number load-percentage) battery-load-low)
(setq battery-status "low"
battery-status-symbol "-"))
(t
(setq battery-status "high"
battery-status-symbol "")))