diff options
| author | Eli Zaretskii | 2001-09-07 12:42:12 +0000 |
|---|---|---|
| committer | Eli Zaretskii | 2001-09-07 12:42:12 +0000 |
| commit | 70569550f7cb9673a9f0ef9a5815527f73eee253 (patch) | |
| tree | cd5cd6f23251d39073f5d188e66d316561d43568 | |
| parent | a56ebb90180139f03bce577f420630816a5845af (diff) | |
| download | emacs-70569550f7cb9673a9f0ef9a5815527f73eee253.tar.gz emacs-70569550f7cb9673a9f0ef9a5815527f73eee253.zip | |
(archive-dostime): Fix a typo in minutes' computation.
| -rw-r--r-- | lisp/ChangeLog | 5 | ||||
| -rw-r--r-- | lisp/arc-mode.el | 2 |
2 files changed, 6 insertions, 1 deletions
diff --git a/lisp/ChangeLog b/lisp/ChangeLog index ca57a827888..249e46e06e8 100644 --- a/lisp/ChangeLog +++ b/lisp/ChangeLog | |||
| @@ -1,3 +1,8 @@ | |||
| 1 | 2001-09-07 Eli Zaretskii <eliz@is.elta.co.il> | ||
| 2 | |||
| 3 | * arc-mode.el (archive-dostime): Fix a typo in minutes' | ||
| 4 | computation. | ||
| 5 | |||
| 1 | 2001-09-07 Gerd Moellmann <gerd@gnu.org> | 6 | 2001-09-07 Gerd Moellmann <gerd@gnu.org> |
| 2 | 7 | ||
| 3 | * server.el (server-switch-buffer): Use get-window-with-predicate. | 8 | * server.el (server-switch-buffer): Use get-window-with-predicate. |
diff --git a/lisp/arc-mode.el b/lisp/arc-mode.el index 3a0c2321232..987f29f1540 100644 --- 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." | |||
| 447 | (defun archive-dostime (time) | 447 | (defun archive-dostime (time) |
| 448 | "Stringify dos packed TIME record." | 448 | "Stringify dos packed TIME record." |
| 449 | (let ((hour (logand (ash time -11) 31)) | 449 | (let ((hour (logand (ash time -11) 31)) |
| 450 | (minute (logand (ash time -5) 53)) | 450 | (minute (logand (ash time -5) 63)) |
| 451 | (second (* 2 (logand time 31)))) ; 2 seconds resolution | 451 | (second (* 2 (logand time 31)))) ; 2 seconds resolution |
| 452 | (format "%02d:%02d:%02d" hour minute second))) | 452 | (format "%02d:%02d:%02d" hour minute second))) |
| 453 | 453 | ||