diff options
| -rw-r--r-- | emms-player-mpd.el | 4 | ||||
| -rw-r--r-- | emms-playing-time.el | 3 |
2 files changed, 5 insertions, 2 deletions
diff --git a/emms-player-mpd.el b/emms-player-mpd.el index fff4135..f74fd7a 100644 --- a/emms-player-mpd.el +++ b/emms-player-mpd.el @@ -341,10 +341,12 @@ This is usually called by a timer." (null song) (string= song emms-player-mpd-current-song)) (setq emms-player-mpd-current-song song) + (run-hooks 'emms-player-stopped-hook) (with-current-emms-playlist (emms-playlist-select (progn (goto-line (1+ (string-to-number song))) - (point))))))) + (point)))) + (run-hooks 'emms-player-started-hook)))) (defun emms-player-mpd-get-filename (file) "Turn FILE into something that MusicPD can understand. diff --git a/emms-playing-time.el b/emms-playing-time.el index ad2da90..ca39b08 100644 --- a/emms-playing-time.el +++ b/emms-playing-time.el @@ -74,7 +74,8 @@ should enable `emms-playing-time-display-p' first, though." (defun emms-playing-time-start () "Get ready for display playing time." (setq emms-playing-time 0) - (run-at-time t 1 'emms-playing-time-display)) + (setq emms-playing-time-display-timer + (run-at-time t 1 'emms-playing-time-display))) (defun emms-playing-time-stop () "Remove playing time on the mode line." |