[Top][All Lists]
[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
[emms-help] Re: seeking in emm-player-mpd
From: |
David Engster |
Subject: |
[emms-help] Re: seeking in emm-player-mpd |
Date: |
Sun, 21 Feb 2010 13:52:15 +0100 |
User-agent: |
Gnus/5.110011 (No Gnus v0.11) Emacs/23.1.92 (gnu/linux) |
David Engster <address@hidden> writes:
> + (concat "seek " song " " (round (number-to-string (+ secs
> amount))))
This is of course wrong... Don't know why this ever seemed to
work. Please find attached the corrected patch. Sorry for the noise.
-David
diff --git a/lisp/emms-player-mpd.el b/lisp/emms-player-mpd.el
index fa8f911..e15cced 100644
--- a/lisp/emms-player-mpd.el
+++ b/lisp/emms-player-mpd.el
@@ -993,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)
@@ -1004,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 ()