[emms] disable recursive search for subtitle files

Most of the time it's more of a hindrance than a help.
This commit is contained in:
contrapunctus 2021-09-22 09:27:15 +05:30
parent e18f66752d
commit 585ca01285
1 changed files with 11 additions and 10 deletions

View File

@ -902,16 +902,17 @@ Unique key-values for task "Exercise"
"-ao=jack,alsa"
;; "--loop-file=inf"
)
(let* ((dir (->> (emms-playlist-current-selected-track)
(alist-get 'name)
(file-name-directory)))
(subs-in-dir (f-glob "*.srt" dir))
(subs-in-subdir (f-glob "*/*.srt" dir)))
(->> (append subs-in-dir subs-in-subdir)
(-interpose ":")
(append '("--sub-files="))
(apply #'concat)
(list))))))
;; (let* ((dir (->> (emms-playlist-current-selected-track)
;; (alist-get 'name)
;; (file-name-directory)))
;; (subs-in-dir (f-glob "*.srt" dir))
;; (subs-in-subdir (f-glob "*/*.srt" dir)))
;; (->> (append subs-in-dir subs-in-subdir)
;; (-interpose ":")
;; (append '("--sub-files="))
;; (apply #'concat)
;; (list)))
)))
;; ;; This won't work for `emms-random', because it runs in a `save-excursion'
;; (add-to-list 'emms-playlist-selection-changed-hook 'emms-playlist-mode-center-current)
;; (--map (add-to-list 'emms-player-mpv-parameters it)