mirror/emacs
1
0
Fork 0
mirror of https://git.savannah.gnu.org/git/emacs.git synced 2024-11-28 07:45:00 +00:00
Code Issues Releases Activity

Fix error in xdg-mime-apps-files when XDG_CURRENT_DESKTOP is defined

Browse Source 
* lisp/xdg.el (xdg-mime-apps-files): Don't bug out when
XDG_CURRENT_DESKTOP is bound (bug#48748).
This commit is contained in:
Lars Ingebrigtsen 2021-05-31 06:36:23 +02:00
parent ed72a8ccd5
commit 7733076638
1 changed files with 1 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

2
lisp/xdg.el
View File

@ -231,7 +231,7 @@ admin config, and finally system cached associations."
(desktop (getenv "XDG_CURRENT_DESKTOP"))
res)
(when desktop
(setq desktop (format "%s-mimeapps.list" desktop)))
(setq desktop (list (format "%s-mimeapps.list" desktop))))
(dolist (name (cons "mimeapps.list" desktop))
(push (expand-file-name name (xdg-config-home)) res)
(push (expand-file-name (format "applications/%s" name) (xdg-data-home))