aboutsummaryrefslogtreecommitdiffstats
diff options
context:
space:
mode:
-rw-r--r--lisp/battery.el10
1 files changed, 5 insertions, 5 deletions
diff --git a/lisp/battery.el b/lisp/battery.el
index 068f1ab50d5..c82d3ac02b3 100644
--- a/lisp/battery.el
+++ b/lisp/battery.el
@@ -1,6 +1,6 @@
1;;; battery.el --- display battery status information 1;;; battery.el --- display battery status information
2 2
3;; Copyright (C) 1997, 1998, 2000, 2001 Free Software Foundation, Inc. 3;; Copyright (C) 1997, 1998, 2000, 2001, 2003 Free Software Foundation, Inc.
4 4
5;; Author: Ralph Schleicher <rs@nunatak.allgaeu.org> 5;; Author: Ralph Schleicher <rs@nunatak.allgaeu.org>
6;; Keywords: hardware 6;; Keywords: hardware
@@ -24,9 +24,9 @@
24 24
25;;; Commentary: 25;;; Commentary:
26 26
27;; There is at present only a function interpreting the new `/proc/apm' 27;; There is at present support for interpreting the new `/proc/apm'
28;; file format of Linux version 1.3.58 or newer. That is, what a lucky 28;; file format of Linux version 1.3.58 or newer and for the `/proc/acpi/'
29;; coincidence, exactly the interface provided by the author's laptop. 29;; directory structure of Linux 2.4.20 and 2.6.
30 30
31;;; Code: 31;;; Code:
32 32
@@ -308,8 +308,8 @@ The following %-sequences are provided:
308 (cons ?r (or (and rate (number-to-string rate)) "N/A")) 308 (cons ?r (or (and rate (number-to-string rate)) "N/A"))
309 (cons ?B (or charging-state "N/A")) 309 (cons ?B (or charging-state "N/A"))
310 (cons ?b (or (and (string= charging-state "charging") "+") 310 (cons ?b (or (and (string= charging-state "charging") "+")
311 (and warn (< capacity warn) "-")
312 (and low (< capacity low) "!") 311 (and low (< capacity low) "!")
312 (and warn (< capacity warn) "-")
313 "")) 313 ""))
314 (cons ?h (or (and hours (number-to-string hours)) "N/A")) 314 (cons ?h (or (and hours (number-to-string hours)) "N/A"))
315 (cons ?m (or (and minutes (number-to-string minutes)) "N/A")) 315 (cons ?m (or (and minutes (number-to-string minutes)) "N/A"))