diff options
author | Yuchen Pei <id@ypei.org> | 2025-08-31 22:36:51 +1000 |
---|---|---|
committer | Yuchen Pei <id@ypei.org> | 2025-08-31 22:36:51 +1000 |
commit | ca5e376eac234dadc936afeb885e717e24bf8085 (patch) | |
tree | 4752ea08818cdd193a39428cfd28b4397aab3814 | |
parent | bc299eac5c1e4f4463e09c892ba4e3b09f82a9c1 (diff) |
[emacs] fix an emms function
-rw-r--r-- | emacs/.emacs.d/lisp/my/my-emms.el | 3 |
1 files changed, 1 insertions, 2 deletions
diff --git a/emacs/.emacs.d/lisp/my/my-emms.el b/emacs/.emacs.d/lisp/my/my-emms.el index e8be5ee..0a42efe 100644 --- a/emacs/.emacs.d/lisp/my/my-emms.el +++ b/emacs/.emacs.d/lisp/my/my-emms.el @@ -257,8 +257,7 @@ filter extensions from filter-exts." (not (equal s "")) (or (not filter-exts) (member - (when (string-match "^.*\\.\\(.*\\)$" s) - (match-string 1 s)) + (downcase (or (file-name-extension s) "")) filter-exts)))) (split-string (buffer-substring-no-properties from to) " |