aboutsummaryrefslogtreecommitdiff
path: root/lisp/emms.el
diff options
context:
space:
mode:
authorYoni Rabkin <yrk@gnu.org>2014-12-02 15:01:39 -0500
committerYoni Rabkin <yrk@gnu.org>2014-12-02 15:01:39 -0500
commit857229ca8fa7f058e956cf9dcfbae19d23f2e50b (patch)
tree03ac33a4552782eeab3fe536947365569e446c07 /lisp/emms.el
parent65550e4d2afbd2f9d068539e0867f91ec16b068b (diff)
Add and use variable `emms-player-base-format-list'.
This variable holds the set of common formats that most modern players support. A new player definition should use this base list and add formats specific to the new player in the player definition file.
Diffstat (limited to 'lisp/emms.el')
-rw-r--r--lisp/emms.el13
1 files changed, 10 insertions, 3 deletions
diff --git a/lisp/emms.el b/lisp/emms.el
index 148477a..253cfd2 100644
--- a/lisp/emms.el
+++ b/lisp/emms.el
@@ -316,9 +316,9 @@ This also disables any read-onliness of the current buffer."
(emms-playlist-current-clear))
(let ((emms-source-old-buffer (or emms-source-old-buffer
(current-buffer))))
- (with-current-buffer emms-playlist-buffer
- (let ((inhibit-read-only t))
- ,@body)))))
+ (with-current-buffer emms-playlist-buffer
+ (let ((inhibit-read-only t))
+ ,@body)))))
(put 'with-current-emms-playlist 'lisp-indent-function 0)
(put 'with-current-emms-playlist 'edebug-form-spec '(body))
@@ -358,6 +358,13 @@ Point will not be restored afterward."
(put 'emms-walk-tracks 'lisp-indent-function 0)
(put 'emms-walk-tracks 'edebug-form-spec '(body))
+(defvar emms-player-base-format-list
+ '("ogg" "mp3" "wav" "mpg" "mpeg" "wmv" "wma"
+ "mov" "avi" "divx" "ogm" "ogv" "asf" "mkv"
+ "rm" "rmvb" "mp4" "flac" "vob" "m4a" "ape"
+ "flv" "webm" "aif")
+ "A list of common formats which player definitions can use.")
+
;;; User Interface