X-Git-Url: https://thelambdalab.xyz/gitweb/index.cgi?p=emus.git;a=blobdiff_plain;f=emus.el;fp=emus.el;h=e5f2ea3673be471ed66bb75d903cc972e811dada;hp=22ac2a80a5fa03cce829856df45050de1c4a9781;hb=c5a7db9695b7110c921d973145b9d41dcd10e564;hpb=ae0c11ea2dc933eee3f84706b6409645ebbedd1f diff --git a/emus.el b/emus.el index 22ac2a8..e5f2ea3 100644 --- a/emus.el +++ b/emus.el @@ -56,6 +56,10 @@ "Name of (and, optionally, path to) mpg123 binary." :type '(string)) +(defcustom emus-mpg123-args nil + "Arguments to pass to mpg123." + :type '(repeat string)) + (defface emus-artist '((((background dark)) :inherit font-lock-string-face :background "#222" :extend t) (t :inherit font-lock-string-face :background "#ddd" :extend t)) @@ -125,7 +129,9 @@ To enable or disable progress tracking, using `emus-toggle-progress-tracking'. emus-process (let ((proc (make-process :name "emus-process" - :command `(,emus-mpg123-program "-R")))) + :command `(,emus-mpg123-program + ,@emus-mpg123-args + "-R")))) (set-process-query-on-exit-flag proc nil) (unless emus-progress-enabled (process-send-string proc "silence\n"))