[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
[elpa] externals/emms 0657a1f: * emms-player-mpv.el: fix calling emms-pl
From: |
ELPA Syncer |
Subject: |
[elpa] externals/emms 0657a1f: * emms-player-mpv.el: fix calling emms-player-paused-hook twice on pause/unpause from emms |
Date: |
Tue, 19 Oct 2021 16:57:16 -0400 (EDT) |
branch: externals/emms
commit 0657a1facdf39464a0049e2abaec850da5057854
Author: Mike Kazantsev <mk.fraggod@gmail.com>
Commit: fraggod@malediction <mk.fraggod@gmail.com>
* emms-player-mpv.el: fix calling emms-player-paused-hook twice on
pause/unpause from emms
---
emms-player-mpv.el | 10 ++++++----
1 file changed, 6 insertions(+), 4 deletions(-)
diff --git a/emms-player-mpv.el b/emms-player-mpv.el
index 7bf8a8c..e4a8ceb 100644
--- a/emms-player-mpv.el
+++ b/emms-player-mpv.el
@@ -675,12 +675,14 @@ Called before `emms-player-mpv-event-functions' and does
same thing as these hoo
(emms-player-started emms-player-mpv))
(emms-player-mpv-event-playing-time-sync))
("pause"
- (setq emms-player-paused-p t)
- (run-hooks 'emms-player-paused-hook))
+ (unless emms-player-paused-p
+ (setq emms-player-paused-p t)
+ (run-hooks 'emms-player-paused-hook)))
("unpause"
(emms-player-mpv-event-playing-time-sync)
- (setq emms-player-paused-p nil)
- (run-hooks 'emms-player-paused-hook))
+ (when emms-player-paused-p
+ (setq emms-player-paused-p nil)
+ (run-hooks 'emms-player-paused-hook)))
("end-file"
(when (emms-player-mpv-proc-playing-p)
(emms-player-mpv-proc-playing nil)
[Prev in Thread] |
Current Thread |
[Next in Thread] |
- [elpa] externals/emms 0657a1f: * emms-player-mpv.el: fix calling emms-player-paused-hook twice on pause/unpause from emms,
ELPA Syncer <=