]> code.delx.au - gnu-emacs/blobdiff - lisp/battery.el
(diff-mode-shared-map): Don't bind M-W, M-U, M-C,
[gnu-emacs] / lisp / battery.el
index 65b8baff66c0e5c43bb2d1b295181590cb8b407a..34f74aa9932d44a0901a31bb7b56410645f5ad1f 100644 (file)
@@ -391,8 +391,8 @@ The following %-sequences are provided:
                                         rate-type)) "N/A"))
          (cons ?B (or charging-state "N/A"))
          (cons ?b (or (and (string= charging-state "charging") "+")
-                      (and (< capacity low) "!")
-                      (and (< capacity warn) "-")
+                      (and capacity (< capacity low) "!")
+                      (and capacity (< capacity warn) "-")
                       ""))
          (cons ?h (or (and hours (number-to-string hours)) "N/A"))
          (cons ?m (or (and minutes (number-to-string minutes)) "N/A"))