branch: externals/mpdired
commit c1e0eff8a44b604eeca9f201fab2a46ded8ee388
Author: Manuel Giraud <[email protected]>
Commit: Manuel Giraud <[email protected]>
tweak buffer names
Do not show default MPD port and use the inode prefixed by a slash for
Unix socket.
---
mpdired.el | 8 ++++++--
1 file changed, 6 insertions(+), 2 deletions(-)
diff --git a/mpdired.el b/mpdired.el
index 6bd286deb3..867b0ace99 100644
--- a/mpdired.el
+++ b/mpdired.el
@@ -195,8 +195,12 @@
(defun mpdired--hostname (host service localp)
(if localp
- (format "%s" host)
- (format "%s:%s" host service)))
+ (let ((inode (file-attribute-inode-number
+ (file-attributes service))))
+ (format "/%d" inode))
+ (if (= 6600 service)
+ host
+ (format "%s:%s" host service))))
(defun mpdired--comm-name (host service localp)
(format "*mpdired-%s*" (mpdired--hostname host service localp)))
