/[emacs]/emacs/lisp/battery.el
ViewVC logotype

Diff of /emacs/lisp/battery.el

Parent Directory Parent Directory | Revision Log Revision Log | View Patch Patch

revision 1.17 by eliz, Sat Sep 6 19:28:08 2003 UTC revision 1.18 by as, Wed Sep 10 19:51:01 2003 UTC
# Line 1  Line 1 
1  ;;; battery.el --- display battery status information  ;;; battery.el --- display battery status information
2    
3  ;; Copyright (C) 1997, 1998, 2000, 2001 Free Software Foundation, Inc.  ;; Copyright (C) 1997, 1998, 2000, 2001, 2003 Free Software Foundation, Inc.
4    
5  ;; Author: Ralph Schleicher <rs@nunatak.allgaeu.org>  ;; Author: Ralph Schleicher <rs@nunatak.allgaeu.org>
6  ;; Keywords: hardware  ;; Keywords: hardware
# Line 24  Line 24 
24    
25  ;;; Commentary:  ;;; Commentary:
26    
27  ;; There is at present only a function interpreting the new `/proc/apm'  ;; 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  ;; 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.  ;; directory structure of Linux 2.4.20 and 2.6.
30    
31  ;;; Code:  ;;; Code:
32    
# Line 308  The following %-sequences are provided: Line 308  The following %-sequences are provided:
308            (cons ?r (or (and rate (number-to-string rate)) "N/A"))            (cons ?r (or (and rate (number-to-string rate)) "N/A"))
309            (cons ?B (or charging-state "N/A"))            (cons ?B (or charging-state "N/A"))
310            (cons ?b (or (and (string= charging-state "charging") "+")            (cons ?b (or (and (string= charging-state "charging") "+")
                        (and warn (< capacity warn) "-")  
311                         (and low (< capacity low) "!")                         (and low (< capacity low) "!")
312                           (and warn (< capacity warn) "-")
313                         ""))                         ""))
314            (cons ?h (or (and hours (number-to-string hours)) "N/A"))            (cons ?h (or (and hours (number-to-string hours)) "N/A"))
315            (cons ?m (or (and minutes (number-to-string minutes)) "N/A"))            (cons ?m (or (and minutes (number-to-string minutes)) "N/A"))

Legend:
Removed from v.1.17  
changed lines
  Added in v.1.18

savannah-hackers-public@gnu.org
ViewVC Help
Powered by ViewVC 1.1.26