diff options
author | Chong Yidong <cyd@stupidchicken.com> | 2006-11-01 14:24:37 +0000 |
---|---|---|
committer | Chong Yidong <cyd@stupidchicken.com> | 2006-11-01 14:24:37 +0000 |
commit | 5c79f850e1a1d90b1b3aa96ce3d523d7fa80774a (patch) | |
tree | 81be7f039723219dee39df242a9ea98569d26855 | |
parent | 6a3f3de849030c21b5d22487c4ddceff19706464 (diff) | |
download | emacs-5c79f850e1a1d90b1b3aa96ce3d523d7fa80774a.tar.gz |
* battery.el (battery-linux-proc-acpi): Prevent range error when
`full-capacity' is 0.
-rw-r--r-- | lisp/ChangeLog | 5 | ||||
-rw-r--r-- | lisp/battery.el | 1 |
2 files changed, 6 insertions, 0 deletions
diff --git a/lisp/ChangeLog b/lisp/ChangeLog index 83c082df439..85adffd97c3 100644 --- a/lisp/ChangeLog +++ b/lisp/ChangeLog @@ -1,3 +1,8 @@ +2006-10-31 Andreas Seltenreich <uwi7@rz.uni-karlsruhe.de> + + * battery.el (battery-linux-proc-acpi): Prevent range error when + `full-capacity' is 0. + 2006-10-31 Yoni Rabkin Katzenell <yoni-r@actcom.com> (tiny change) * lisp/faces.el (faces-sample-overlay): New defvar. diff --git a/lisp/battery.el b/lisp/battery.el index 50edc8dde8a..ec35e04e1ab 100644 --- a/lisp/battery.el +++ b/lisp/battery.el @@ -408,6 +408,7 @@ The following %-sequences are provided: (format "%d:%02d" hours (- minutes (* 60 hours)))) "N/A")) (cons ?p (or (and full-capacity capacity + (> full-capacity 0) (number-to-string (floor (/ capacity (/ (float full-capacity) 100))))) |