branch: elpa/subed
commit dde5dfd3ad38aa1bff33ef3fac2ec8a8dabc1cee
Author: Random User <rnd...@posteo.de>
Commit: Random User <rnd...@posteo.de>
Simplify subed-mpv--client-buffer
---
subed/subed-mpv.el | 13 ++++++-------
1 file changed, 6 insertions(+), 7 deletions(-)
diff --git a/subed/subed-mpv.el b/subed/subed-mpv.el
index 6558f9f..e4da997 100644
--- a/subed/subed-mpv.el
+++ b/subed/subed-mpv.el
@@ -127,13 +127,12 @@ Pass ARGS as command line arguments. \"--idle\" and
(defun subed-mpv--client-buffer ()
"Unique name of buffer that store RPC responses."
- (if subed-debugging-enabled-p
- (format "*subed-mpv-buffer:%s-%s*"
- (file-name-base (or (buffer-file-name) "unnamed"))
- (buffer-hash))
- (format " *subed-mpv-buffer:%s-%s*"
- (file-name-base (or (buffer-file-name) "unnamed"))
- (buffer-hash))))
+ (let ((buffer-name (format "*subed-mpv-buffer:%s-%s*"
+ (file-name-base (or (buffer-file-name) "unnamed"))
+ (buffer-hash))))
+ (if subed-debugging-enabled-p
+ buffer-name
+ (concat " " buffer-name))))
(defun subed-mpv--client-connect (delays)
"Try to connect to `subed-mpv--socket'.
