emms-patches
[Top][All Lists]
Advanced

[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]

[Emms-patches] [COMMIT] * emms-player-vlc.el (emms-player-vlc-seek): Add


From: Yoni Rabkin
Subject: [Emms-patches] [COMMIT] * emms-player-vlc.el (emms-player-vlc-seek): Add seek functionality for vlc.
Date: Thu, 2 Oct 2008 18:01:50 +0300

* 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 address@hidden 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





reply via email to

[Prev in Thread] Current Thread [Next in Thread]