emms-patches
[Top][All Lists]
Advanced

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

[Emms-patches] [PATCH] let emms-player-mpd support single track repeat.


From: S.P.Tseng
Subject: [Emms-patches] [PATCH] let emms-player-mpd support single track repeat.
Date: Mon, 31 Aug 2009 19:12:24 +0800

---
 lisp/emms.el |    7 ++++++-
 1 files changed, 6 insertions(+), 1 deletions(-)

diff --git a/lisp/emms.el b/lisp/emms.el
index 3c5402d..5fc1ab7 100644
--- a/lisp/emms.el
+++ b/lisp/emms.el
@@ -501,9 +501,14 @@ See `emms-repeat-playlist'."
 See  `emms-repeat-track'."
   (interactive)
   (setq emms-repeat-track (not emms-repeat-track))
+  (when (equal (emms-player-for
+                (emms-playlist-current-selected-track)) 'emms-player-mpd)
+    (emms-player-mpd-send
+     (concat "single " (if emms-repeat-track "1" "0"))
+     nil #'ignore))
   (if emms-repeat-track
       (message "Will repeat the current track.")
-    (message "Will advance to the next track after this one.")))
+      (message "Will advance to the next track after this one.")))
 
 (defun emms-sort-track-name-less-p (a b)
   "Return non-nil if the track name of A sorts before B."
-- 
1.6.4.2





reply via email to

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