Mercurial > emacs

comparison lisp/battery.el @ 36090:9ed7c3f74e35

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
(battery-status-function): Fix doc, :type.
author Dave Love <fx@gnu.org>
date Thu, 15 Feb 2001 00:10:06 +0000
parents fb23c215bdc8
children 1c462d61083a
comparison
equal deleted inserted replaced
36089:7c187af15c2c 36090:9ed7c3f74e35
42 (defcustom battery-status-function 42 (defcustom battery-status-function
43 (cond ((and (eq system-type 'gnu/linux) 43 (cond ((and (eq system-type 'gnu/linux)
44 (file-readable-p "/proc/apm")) 44 (file-readable-p "/proc/apm"))
45 'battery-linux-proc-apm)) 45 'battery-linux-proc-apm))
46 "*Function for getting battery status information. 46 "*Function for getting battery status information.
47 The function have to return an alist of conversion definitions. 47 The function has to return an alist of conversion definitions.
48 Cons cells are of the form 48 Its cons cells are of the form
49 49
50 (CONVERSION . REPLACEMENT-TEXT) 50 (CONVERSION . REPLACEMENT-TEXT)
51 51
52 CONVERSION is the character code of a \"conversion specification\" 52 CONVERSION is the character code of a \"conversion specification\"
53 introduced by a `%' character in a control string." 53 introduced by a `%' character in a control string."
54 :type 'function 54 :type '(choice (const nil) function)
55 :group 'battery) 55 :group 'battery)
56 56
57 (defcustom battery-echo-area-format 57 (defcustom battery-echo-area-format
58 (cond ((eq battery-status-function 'battery-linux-proc-apm) 58 (cond ((eq battery-status-function 'battery-linux-proc-apm)
59 "Power %L, battery %B (%p%% load, remaining time %t)")) 59 "Power %L, battery %B (%p%% load, remaining time %t)"))