branch: elpa/subed
commit 4ef16469caf0fae344b812221a1e53ae595283e5
Author: Random User <rnd...@posteo.de>
Commit: Random User <rnd...@posteo.de>
subed-mpv-find-video: Kill previous mpv instance if existing
---
subed/subed-mpv.el | 2 ++
1 file changed, 2 insertions(+)
diff --git a/subed/subed-mpv.el b/subed/subed-mpv.el
index 2cf90f1..8eff234 100644
--- a/subed/subed-mpv.el
+++ b/subed/subed-mpv.el
@@ -342,6 +342,8 @@ Video files are expected to have any of the extensions
listed in
`subed-video-extensions'."
(interactive (list (read-file-name "Find video: " nil nil t nil
#'subed-mpv--is-video-file-p)))
(let ((filepath (expand-file-name file)))
+ (when (subed-mpv--server-started-p)
+ (subed-mpv-kill))
(when (apply #'subed-mpv--server-start subed-mpv-arguments)
(subed-debug "Opening video file: %s" filepath)
(subed-mpv--client-connect subed-mpv--retry-delays)
