* lisp/xdg.el (xdg-mime-apps): Fix recent regression.

After the change that introduced 'hash-table-contains-p'
it's necessary to keep setting 'files' to the hash value.
This commit is contained in:
Juri Linkov 2025-10-09 20:27:41 +03:00
parent 0925e19064
commit 7c7bfa625e

View file

@ -385,7 +385,8 @@ Results are cached in `xdg-mime-table'."
(when (null (assoc type xdg-mime-table))
(push (cons type (make-hash-table :test #'equal)) xdg-mime-table))
(if (let ((table (cdr (assoc type xdg-mime-table))))
(hash-table-contains-p subtype table))
(and (hash-table-contains-p subtype table)
(setq files (gethash subtype table))))
files
(and files (setq files nil))
(let ((dirs (mapcar (lambda (dir) (expand-file-name "applications" dir))