From ca5e376eac234dadc936afeb885e717e24bf8085 Mon Sep 17 00:00:00 2001 From: Yuchen Pei Date: Sun, 31 Aug 2025 22:36:51 +1000 Subject: [emacs] fix an emms function --- emacs/.emacs.d/lisp/my/my-emms.el | 3 +-- 1 file changed, 1 insertion(+), 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) " -- cgit v1.2.3