procyberian/emacs
1
0
Fork 0
Code Issues Pull requests Projects Releases Packages Wiki Activity Actions

Report critical battery errors

Browse source 
* 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
1 changed files with 3 additions and 3 deletions
Download patch file Download diff file Expand all files Collapse all files

6
lisp/battery.el
View file

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