mirror of
git://git.sv.gnu.org/emacs.git
synced 2026-02-17 01:34:21 +00:00
* 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:
parent
0925e19064
commit
7c7bfa625e
1 changed files with 2 additions and 1 deletions
|
|
@ -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))
|
||||
|
|
|
|||
Loading…
Reference in a new issue