diff options
author | Michael Olson <mwolson@gnu.org> | 2006-01-04 08:13:00 +0000 |
---|---|---|
committer | Michael Olson <mwolson@gnu.org> | 2006-01-04 08:13:00 +0000 |
commit | 4bc3739cc8fa888a9708285f50196f2f574b0201 (patch) | |
tree | 598032401ba54d5754776839da818523892640e8 | |
parent | b64ef4cef7b58b20a952d78638125efd21a185ac (diff) |
Make emms-player-mpd work with emms-playing-time.
darcs-hash:20060104081359-1bfb2-a0a8fad9d64ef84432c8698285f9c8293425152d.gz
-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." |