From c5a7db9695b7110c921d973145b9d41dcd10e564 Mon Sep 17 00:00:00 2001 From: plugd Date: Sun, 20 Aug 2023 18:49:29 +0200 Subject: [PATCH] Added mpg123 command-line arguments --- emus.el | 8 +++++++- 1 file changed, 7 insertions(+), 1 deletion(-) 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")) -- 2.20.1