[Emacs-diffs] master a04d35c: Fix a thinko in arc-mode.el

[Eli Zaretskii]

branch: master
commit a04d35cb02528c5584f01c1e3a2bbd86c943b221
Author: Eli Zaretskii <address@hidden>
Commit: Eli Zaretskii <address@hidden>

    Fix a thinko in arc-mode.el
    
    * lisp/arc-mode.el (archive-zip-summarize): Fix last change in the
    non-Zip64 case.  (Bug#20769)
---
 lisp/arc-mode.el |    4 ++--
 1 files changed, 2 insertions(+), 2 deletions(-)

diff --git a/lisp/arc-mode.el b/lisp/arc-mode.el
index 5f2fc8f..4df41b5 100644
--- a/lisp/arc-mode.el
+++ b/lisp/arc-mode.el
@@ -1841,8 +1841,8 @@ This doesn't recover lost files, it just undoes changes 
in the buffer itself."
       (or (string= "PK\006\006" (buffer-substring p (+ p 4)))
           (error "Unrecognized ZIP file format"))
       ;; Offset to central directory:
-      (setq p (+ (point-min)
-                 (archive-l-e (+ p 48) (if emacs-int-has-32bits 4 8)))))
+      (setq p (archive-l-e (+ p 48) (if emacs-int-has-32bits 4 8))))
+    (setq p (+ p (point-min)))
     (while (string= "PK\001\002" (buffer-substring p (+ p 4)))
       (let* ((creator (byte-after (+ p 5)))
             ;; (method  (archive-l-e (+ p 10) 2))