Mercurial > emacs
comparison lisp/battery.el @ 73599:65d9fbabd719
* battery.el (battery-linux-proc-acpi): Prevent range error when
`full-capacity' is 0.
| author | Chong Yidong <cyd@stupidchicken.com> |
|---|---|
| date | Wed, 01 Nov 2006 14:24:37 +0000 |
| parents | b270f677c979 |
| children | 294b1de9ac5f |
comparison
equal
deleted
inserted
replaced
| 73598:a2e7a4d48fea | 73599:65d9fbabd719 |
|---|---|
| 406 (cons ?m (or (and minutes (number-to-string minutes)) "N/A")) | 406 (cons ?m (or (and minutes (number-to-string minutes)) "N/A")) |
| 407 (cons ?t (or (and minutes | 407 (cons ?t (or (and minutes |
| 408 (format "%d:%02d" hours (- minutes (* 60 hours)))) | 408 (format "%d:%02d" hours (- minutes (* 60 hours)))) |
| 409 "N/A")) | 409 "N/A")) |
| 410 (cons ?p (or (and full-capacity capacity | 410 (cons ?p (or (and full-capacity capacity |
| 411 (> full-capacity 0) | |
| 411 (number-to-string | 412 (number-to-string |
| 412 (floor (/ capacity | 413 (floor (/ capacity |
| 413 (/ (float full-capacity) 100))))) | 414 (/ (float full-capacity) 100))))) |
| 414 "N/A"))))) | 415 "N/A"))))) |
| 415 | 416 |