Fix CBZ file detection in doc-view-mode

* lisp/doc-view.el (doc-view-set-doc-type): Fix CBZ file
detection.  (Bug#67133)

This fix is almost identical to the previous fix for ODF file
detection in bug#54947 which resulted in commit
b3ff490538
This commit is contained in:
Morgan Smith 2023-11-12 12:31:39 -05:00 committed by Eli Zaretskii
parent c1251ae1f9
commit 4e406bb420

View file

@ -2085,7 +2085,7 @@ GOTO-PAGE-FN other than `doc-view-goto-page'."
;; zip-archives, so that this same association is used for
;; cbz files. This is fine, as cbz files should be handled
;; like epub anyway.
((looking-at "PK") '(epub odf))))))
((looking-at "PK") '(epub odf cbz))))))
(setq-local
doc-view-doc-type
(car (or (nreverse (seq-intersection name-types content-types #'eq))