[Top][All Lists]
[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
[Emms-patches] [PATCH] emms-player-mpd: Only allow full second steps whe
From: |
David Engster |
Subject: |
[Emms-patches] [PATCH] emms-player-mpd: Only allow full second steps when seeking in file. |
Date: |
Sat, 27 Feb 2010 16:35:14 +0100 |
User-agent: |
Gnus/5.110011 (No Gnus v0.11) Emacs/23.1.92 (gnu/linux) |
* 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
[Prev in Thread] |
Current Thread |
[Next in Thread] |
- [Emms-patches] [PATCH] emms-player-mpd: Only allow full second steps when seeking in file.,
David Engster <=