emacs-diffs
[Top][All Lists]
Advanced

[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]

master 31f289625c: Fix Linux APM BIOS flag testing in battery.el


From: Basil L. Contovounesios
Subject: master 31f289625c: Fix Linux APM BIOS flag testing in battery.el
Date: Wed, 17 Aug 2022 13:17:30 -0400 (EDT)

branch: master
commit 31f289625cb3f72d167f1f9cac246269eeb5c716
Author: Basil L. Contovounesios <contovob@tcd.ie>
Commit: Basil L. Contovounesios <contovob@tcd.ie>

    Fix Linux APM BIOS flag testing in battery.el
    
    Original sin detected by recent byte-compiler improvements; see:
    https://lists.gnu.org/r/emacs-devel/2022-08/msg00611.html
    
    * lisp/battery.el (battery-linux-proc-apm): Treat result of logand
    as a number, not boolean.
---
 lisp/battery.el | 6 +++---
 1 file changed, 3 insertions(+), 3 deletions(-)

diff --git a/lisp/battery.el b/lisp/battery.el
index 93f4070e4b..72b3dfdae7 100644
--- a/lisp/battery.el
+++ b/lisp/battery.el
@@ -369,11 +369,11 @@ The following %-sequences are provided:
        (setq driver-version (match-string 1))
        (setq bios-version (match-string 2))
        (setq tem (string-to-number (match-string 3) 16))
-       (if (not (logand tem 2))
+        (if (zerop (logand tem 2))
            (setq bios-interface "not supported")
          (setq bios-interface "enabled")
-         (cond ((logand tem 16) (setq bios-interface "disabled"))
-               ((logand tem 32) (setq bios-interface "disengaged")))
+          (cond ((/= (logand tem 16) 0) (setq bios-interface "disabled"))
+                ((/= (logand tem 32) 0) (setq bios-interface "disengaged")))
          (setq tem (string-to-number (match-string 4) 16))
          (cond ((= tem 0) (setq line-status "off-line"))
                ((= tem 1) (setq line-status "on-line"))



reply via email to

[Prev in Thread] Current Thread [Next in Thread]