From 7805ee70add349cf732370fb6d23af3d5d6f5720 Mon Sep 17 00:00:00 2001 From: Michael Olson Date: Fri, 5 Jan 2007 00:09:00 +0000 Subject: emms-streams: Try to reconnect to station if briefly disconnected darcs-hash:20070105000942-1bfb2-f536818d060661e6ace6d41cd9cbfbc6c45c47e7.gz --- emms-streams.el | 6 +++++- 1 file changed, 5 insertions(+), 1 deletion(-) diff --git a/emms-streams.el b/emms-streams.el index 0d97006..e464a12 100644 --- a/emms-streams.el +++ b/emms-streams.el @@ -200,7 +200,11 @@ needed info.") This is used when `emms-stream-default-action' is \"play\"." (save-excursion (setq emms-stream-playlist-buffer - (emms-playlist-set-playlist-buffer (emms-playlist-new))))) + (emms-playlist-set-playlist-buffer (emms-playlist-new))) + (with-current-buffer emms-stream-playlist-buffer + ;; make sure that we continue to play the station, even if + ;; briefly disconnected + (set (make-local-variable 'emms-repeat-playlist) t)))) (defun emms-stream-kill-playlist () "Delete the EMMS playlist associated with emms-streams, if one exists." -- cgit v1.2.3