ndwarshuis
/
emacs-config
1
0
Fork 0
Code Issues Pull Requests Packages Projects Releases Wiki Activity

FIX mime type matching

This commit is contained in:
Nathan Dwarshuis 2024-03-11 13:00:38 -04:00
parent 8e7f54fea6
commit 810f759d1c
1 changed files with 2 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

3
etc/conf.org
View File

@ -272,7 +272,8 @@ OS is one of those in `system-type'."
"Return all applications that can open a given MIMETYPE. "Return all applications that can open a given MIMETYPE.
The list is comprised of alists where pairs are of the form (name . command)." The list is comprised of alists where pairs are of the form (name . command)."
(let ((case-fold-search nil) (let ((case-fold-search nil)
(mime-regex (format "^MimeType=.*%s;?.*$" mimetype))) (mime-regex (->> (regexp-quote mimetype)
(format "^MimeType=.*%s;?.*$"))))
(->> (list "/usr/share/applications" (->> (list "/usr/share/applications"
"/usr/local/share/applications" "/usr/local/share/applications"
"~/.local/share/applications") "~/.local/share/applications")