TakeV/spacemacs
1
0
Fork 0
Code Issues Pull requests Packages Projects Releases Wiki Activity

Better detection of battery absence

Browse source
This commit is contained in:
syl20bnr 2014-12-25 21:15:06 -05:00
parent 8bb676d524
commit db55268e79
1 changed files with 6 additions and 5 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

11
spacemacs/packages.el
View file

@ -815,7 +815,8 @@ determine the state to enable when escaping from the insert state.")
(defun spacemacs/mode-line-battery-percentage ()
"Return the load percentage or an empty string."
(let ((p (cdr (assq ?p fancy-battery-last-status))))
(if (and fancy-battery-show-percentage p) (concat " " p "%%") "")))
(if (and fancy-battery-show-percentage
p (not (string= "N/A" p))) (concat " " p "%%") "")))
(defun spacemacs/mode-line-battery-time ()
"Return the remaining time complete load or discharge."
@ -840,10 +841,10 @@ determine the state to enable when escaping from the insert state.")
(let* ((type (cdr (assq ?L fancy-battery-last-status)))
(percentage (spacemacs/mode-line-battery-percentage))
(time (spacemacs/mode-line-battery-time)))
(if type
(concat (if (string= "AC" type) " AC" "") percentage time)
;; Battery status is not available
"No Battery Info"))))
(cond
((string= "on-line" type) " No Battery")
((string-empty-p type) " No Battery")
(t (concat (if (string= "AC" type) " AC" "") percentage time))))))
(defun fancy-battery-powerline-face ()
"Return a face appropriate for powerline"