(archive-dostime): Fix a typo in minutes' computation.

diff --git a/lisp/ChangeLog b/lisp/ChangeLog
index ca57a827888c661b75fcaf18af4035d2abb8946a..249e46e06e87b9d12efaeefef90b355e31aa387a 100644 (file)
--- a/lisp/ChangeLog
+++ b/lisp/ChangeLog
@@ -1,3 +1,8 @@
+2001-09-07  Eli Zaretskii  <eliz@is.elta.co.il>
+
+       * arc-mode.el (archive-dostime): Fix a typo in minutes'
+       computation.
+
 2001-09-07  Gerd Moellmann  <gerd@gnu.org>
 
        * server.el (server-switch-buffer): Use get-window-with-predicate.

diff --git a/lisp/arc-mode.el b/lisp/arc-mode.el
index 3a0c23212327b59ead4051a8a6119eb851398962..987f29f154036f26c22abaecddff2deb45bbfa4f 100644 (file)
--- a/lisp/arc-mode.el
+++ b/lisp/arc-mode.el
@@ -447,7 +447,7 @@ the mode is invalid.  If ERROR is nil then nil will be returned."
 (defun archive-dostime (time)
   "Stringify dos packed TIME record."
   (let ((hour (logand (ash time -11) 31))
-        (minute (logand (ash time -5) 53))
+        (minute (logand (ash time -5) 63))
         (second (* 2 (logand time 31)))) ; 2 seconds resolution
     (format "%02d:%02d:%02d" hour minute second)))