From 692d1841d1f088dac00737f44ecbf7aca3781317 Mon Sep 17 00:00:00 2001 From: Lucas Bonnet Date: Mon, 1 Mar 2010 18:30:31 +0100 Subject: * emms-player-mpd: (emms-player-mpd-seek, emms-player-mpd-seek-to): Round to full seconds since mpd doesn't allow float values for seeking (this usually happens with emms-cue-next, for instance). Patch by David Engster --- lisp/emms-player-mpd.el | 4 ++-- 1 file changed, 2 insertions(+), 2 deletions(-) (limited to 'lisp/emms-player-mpd.el') diff --git a/lisp/emms-player-mpd.el b/lisp/emms-player-mpd.el index 7ba5742..4b37cee 100644 --- a/lisp/emms-player-mpd.el +++ b/lisp/emms-player-mpd.el @@ -994,7 +994,7 @@ from other functions." (secs (emms-player-mpd-get-playing-time nil #'ignore info))) (when (and song secs) (emms-player-mpd-send - (concat "seek " song " " (number-to-string (+ secs amount))) + (concat "seek " song " " (number-to-string (round (+ secs amount)))) nil #'ignore)))))) (defun emms-player-mpd-seek-to (pos) @@ -1005,7 +1005,7 @@ from other functions." (lambda (pos song) (when (and song pos) (emms-player-mpd-send - (concat "seek " song " " (number-to-string pos)) + (concat "seek " song " " (number-to-string (round pos))) nil #'ignore))))) (defun emms-player-mpd-next () -- cgit v1.2.3