X-Git-Url: https://code.delx.au/gnu-emacs-elpa/blobdiff_plain/5adc7147556b54640cd354c406b3febb1f5694ee..8af54043a17f71db57963ddf86ccd0de81acea2c:/packages/wcheck-mode/wcheck-mode.el

diff --git a/packages/wcheck-mode/wcheck-mode.el b/packages/wcheck-mode/wcheck-mode.el
index d598f2342..34838ae10 100644
--- a/packages/wcheck-mode/wcheck-mode.el
+++ b/packages/wcheck-mode/wcheck-mode.el
@@ -2059,8 +2059,7 @@ The returned value is a floating point number."
          (high (nth 0 idle))
          (low (nth 1 idle))
          (micros (nth 2 idle)))
-    (+ (* high
-          (expt 2 16))
+    (+ (* high 65536)
        low
        (/ micros 1000000.0))))