* emms-player-vlc.el (emms-player-vlc-seek-to): Add docstring.
---
 lisp/emms-player-vlc.el |    9 ++++++---
 1 files changed, 6 insertions(+), 3 deletions(-)

diff --git a/lisp/emms-player-vlc.el b/lisp/emms-player-vlc.el
index fce1fee..11a36e7 100644
--- a/lisp/emms-player-vlc.el
+++ b/lisp/emms-player-vlc.el
@@ -60,12 +60,15 @@
   (process-send-string
    emms-player-simple-process-name "pause\n"))
 
-;; Pending a patch to CVS vlc to add relative seeking to the "rc" vlc
-;; interface.
 (defun emms-player-vlc-seek (sec)
-  (message "Relative seeking not supported yet (bug [EMAIL PROTECTED] about 
it)."))
+  "Seek relative within a stream."
+  (when (not (= 0 sec))
+    (process-send-string
+     emms-player-simple-process-name
+     (if (< 0 sec) "fastforward\n" "rewind\n"))))
 
 (defun emms-player-vlc-seek-to (sec)
+  "Seek to time SEC within the stream."
   (process-send-string
    emms-player-simple-process-name
    (format "seek %d\n" sec)))
-- 
debian.1.5.6.1.19.ge6b2



_______________________________________________
Emms-patches mailing list
[email protected]
http://lists.gnu.org/mailman/listinfo/emms-patches

Reply via email to