Fix ODF file detection in doc-view-mode

* lisp/doc-view.el (doc-view-set-doc-type): Fix ODF file detection
(bug#54947).
This commit is contained in:
Lars Ingebrigtsen 2022-04-16 11:21:25 +02:00
parent 625d6da5ba
commit b3ff490538

View file

@ -1947,8 +1947,7 @@ If BACKWARD is non-nil, jump to the previous match."
;; 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))
))))
((looking-at "PK") '(epub odf))))))
(setq-local
doc-view-doc-type
(car (or (nreverse (seq-intersection name-types content-types #'eq))