diff options
| author | Marcin Borkowski | 2016-02-20 18:33:48 +1100 |
|---|---|---|
| committer | Lars Ingebrigtsen | 2016-02-20 18:33:48 +1100 |
| commit | c9bccf72cbaed5ca2fb5b829687886db92fa6d6b (patch) | |
| tree | 10fe09619cdb4e3a960c4748db76b72f0b1506e8 | |
| parent | d675db943e8e55321a58353600d3574a8433c52d (diff) | |
| download | emacs-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.el | 6 |
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 ""))) |