[Emms-patches] [PATCH] emms-player-mpd: Only allow full second steps when seeking in file.

[David Engster]

* 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).
---
 lisp/emms-player-mpd.el |    4 ++--
 1 files changed, 2 insertions(+), 2 deletions(-)

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 ()
-- 
1.6.3.3