diff --git a/archive-cpio.el b/archive-cpio.el index efa056c..ca7465d 100644 --- a/archive-cpio.el +++ b/archive-cpio.el @@ -147,7 +147,7 @@ ARCHIVE-BUFFER is nil." (concat " -> " (buffer-substring filebeg (+ filebeg filesize))) ""))) (text (concat text-a text-b))) - (push (vector text (length text-a) (length text)) visual) + (push (archive--file-summary text (length text-a) (length text)) visual) (push (vector name name nil mode filebeg) files))) (goto-char next))))) (with-current-buffer (or archive-buffer (current-buffer))