mirrors/emacs
1
Fork 0
mirror of git://git.sv.gnu.org/emacs.git synced 2026-01-30 12:21:25 -08:00
Code Issues Projects Releases Wiki Activity

* lisp/arc-mode.el (archive-get-descr): Use default mode if needed.

Browse source
This commit is contained in:
Michael Albinus 2020-12-01 15:39:38 +01:00
parent 7916c9038c
commit 496d1fcd76
1 changed files with 1 additions and 1 deletions
Download patch file Download diff file Expand all files Collapse all files

2
lisp/arc-mode.el
View file

@ -646,7 +646,7 @@ Does not signal an error if optional argument NOERROR is non-nil."
(< no (length archive-files)))
(let ((item (aref archive-files no)))
(if (and (archive--file-desc-p item)
(let ((mode (archive--file-desc-mode item)))
(let ((mode (or (archive--file-desc-mode item) 0)))
(zerop (logand 16384 mode))))
item
(if (not noerror)