aboutsummaryrefslogtreecommitdiffstats
diff options
context:
space:
mode:
authorMarcin Borkowski2016-02-20 18:33:48 +1100
committerLars Ingebrigtsen2016-02-20 18:33:48 +1100
commitc9bccf72cbaed5ca2fb5b829687886db92fa6d6b (patch)
tree10fe09619cdb4e3a960c4748db76b72f0b1506e8
parentd675db943e8e55321a58353600d3574a8433c52d (diff)
downloademacs-c9bccf72cbaed5ca2fb5b829687886db92fa6d6b.tar.gz
emacs-c9bccf72cbaed5ca2fb5b829687886db92fa6d6b.zip
Report critical battery errors
* lisp/battery.el (battery-pmset): Report critical battery errors (bug#18157).
-rw-r--r--lisp/battery.el6
1 files changed, 3 insertions, 3 deletions
diff --git a/lisp/battery.el b/lisp/battery.el
index d0293697bef..b5e312f6c3e 100644
--- a/lisp/battery.el
+++ b/lisp/battery.el
@@ -628,12 +628,12 @@ The following %-sequences are provided:
628 (cond ((looking-at "; charging") 628 (cond ((looking-at "; charging")
629 (setq battery-status "charging" 629 (setq battery-status "charging"
630 battery-status-symbol "+")) 630 battery-status-symbol "+"))
631 ((< (string-to-number load-percentage) battery-load-low)
632 (setq battery-status "low"
633 battery-status-symbol "-"))
634 ((< (string-to-number load-percentage) battery-load-critical) 631 ((< (string-to-number load-percentage) battery-load-critical)
635 (setq battery-status "critical" 632 (setq battery-status "critical"
636 battery-status-symbol "!")) 633 battery-status-symbol "!"))
634 ((< (string-to-number load-percentage) battery-load-low)
635 (setq battery-status "low"
636 battery-status-symbol "-"))
637 (t 637 (t
638 (setq battery-status "high" 638 (setq battery-status "high"
639 battery-status-symbol ""))) 639 battery-status-symbol "")))