From: Basil L. Contovounesios Date: Wed, 17 Aug 2022 17:11:25 +0000 (+0300) Subject: Fix Linux APM BIOS flag testing in battery.el X-Git-Tag: emacs-29.0.90~1447^2~92 X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=31f289625cb3f72d167f1f9cac246269eeb5c716;p=emacs.git 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. --- diff --git a/lisp/battery.el b/lisp/battery.el index 93f4070e4bc..72b3dfdae7c 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"))