From 2f880075e7adc9c8070e5b0e606af7fbf78eaa0a Mon Sep 17 00:00:00 2001 From: Yuchen Pei Date: Sun, 2 Feb 2025 16:40:11 +1100 Subject: [emacs] fix belf file filtering --- emacs/.emacs.d/lisp/my/belf.el | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) (limited to 'emacs/.emacs.d/lisp/my/belf.el') diff --git a/emacs/.emacs.d/lisp/my/belf.el b/emacs/.emacs.d/lisp/my/belf.el index 84cf184..035f44d 100644 --- a/emacs/.emacs.d/lisp/my/belf.el +++ b/emacs/.emacs.d/lisp/my/belf.el @@ -68,7 +68,7 @@ (when-let ((parsed (belf-parse-file-name f))) (let-alist parsed (list f (vector .authors .title .year))))) - (directory-files belf-dir t "[^#]$")))) + (directory-files belf-dir t "\\.\\(epub\\|pdf\\|mobi\\|cbr\\|djvu\\)$")))) (defun belf-parse-file-name (file-name) (let ((base (file-name-base file-name))) -- cgit v1.2.3