diff options
| author | Yoni Rabkin <yoni@rabkins.net> | 2017-10-20 16:49:00 -0400 |
|---|---|---|
| committer | Yoni Rabkin <yoni@rabkins.net> | 2017-10-20 16:49:00 -0400 |
| commit | 88fecd0234da595843ce6be4d3f9f2b755ff612d (patch) | |
| tree | a577f6b8e5f4a6c297d69a285bec74076e6634ee /lisp | |
| parent | 175e5af5250503c12a395f5559923d2b9367aae3 (diff) | |
* lisp/emms-player-mpd.el: allow socket
Allow mpd to read directly from a named socket.
Diffstat (limited to 'lisp')
| -rw-r--r-- | lisp/emms-player-mpd.el | 12 |
1 files changed, 8 insertions, 4 deletions
diff --git a/lisp/emms-player-mpd.el b/lisp/emms-player-mpd.el index 191d072..83b480c 100644 --- a/lisp/emms-player-mpd.el +++ b/lisp/emms-player-mpd.el @@ -309,10 +309,14 @@ return at the end of a request.") (processp emms-player-mpd-process) (memq (process-status emms-player-mpd-process) '(run open))) (setq emms-player-mpd-process - (funcall emms-player-mpd-connect-function "mpd" - nil - emms-player-mpd-server-name - emms-player-mpd-server-port)) + (if emms-player-mpd-server-port + (funcall emms-player-mpd-connect-function "mpd" + nil + emms-player-mpd-server-name + emms-player-mpd-server-port) + (make-network-process :name "emms-mpd" + :service emms-player-mpd-server-name + :family 'local))) (set-process-sentinel emms-player-mpd-process 'emms-player-mpd-sentinel) (setq emms-player-mpd-queue |