From a1e0284395d623706d797bc8110e59298865c999 Mon Sep 17 00:00:00 2001 From: Michael Olson Date: Tue, 15 May 2007 12:45:00 +0000 Subject: emms-player-mplayer: Use emms-remove-if-not emms-remove-if-not is to be used instead of remove-if-not, because the latter is only available in the CL library, and we're not supposed to depend on that if our code gets included in Emacs. darcs-hash:20070515124505-1bfb2-b4517be2f6d6454c584791c350bbec7d67d9ff81.gz --- emms-player-mplayer.el | 3 ++- 1 file changed, 2 insertions(+), 1 deletion(-) diff --git a/emms-player-mplayer.el b/emms-player-mplayer.el index c7fbffd..fe7a100 100644 --- a/emms-player-mplayer.el +++ b/emms-player-mplayer.el @@ -28,6 +28,7 @@ ;;; Code: +(require 'emms-compat) (require 'emms-player-simple) (define-emms-simple-player mplayer '(file url) @@ -81,7 +82,7 @@ (sub (replace-regexp-in-string (concat ext "$") "sub" name)) ;; TODO, script for chinese, gb, big, etc. (srt (replace-regexp-in-string (concat ext "$") "srt" name)) - (choices (remove-if-not 'file-exists-p (list sub srt))) + (choices (emms-remove-if-not 'file-exists-p (list sub srt))) (subtitle nil)) (cond ((> (length choices) 1) (setq subtitle -- cgit v1.2.3