From 33d0e31b3de4d20e8058c7cc0019ef7ddd9caa2f Mon Sep 17 00:00:00 2001 From: William Xu Date: Sun, 24 Jun 2007 07:11:00 +0000 Subject: emms-player-mplayer.el: Load in all found subtitles instead of forcing user to choose one. darcs-hash:20070624071131-cfa61-936bb6479d5502f83dc0e3e1094259d681d96f60.gz --- emms-player-mplayer.el | 10 ++-------- 1 file changed, 2 insertions(+), 8 deletions(-) diff --git a/emms-player-mplayer.el b/emms-player-mplayer.el index 8dc1d71..728ad03 100644 --- a/emms-player-mplayer.el +++ b/emms-player-mplayer.el @@ -91,14 +91,8 @@ (emms-replace-regexp-in-string (concat ext "$") el name)) emms-player-mplayer-subtitle-extensions))) - (subtitle nil)) - (cond ((> (length choices) 1) - (setq subtitle - (ido-completing-read "Select subtitles: " - choices))) - ((= (length choices) 1) - (setq subtitle (car choices)))) - (when subtitle + (subtitle (mapconcat (lambda (el) el) choices ","))) + (unless (string= subtitle "") (setq emms-player-mplayer-parameters (append emms-player-mplayer-parameters (list "-sub" subtitle)))))) -- cgit v1.2.3