From 228d60c5dcfe06fb30e40efe76be272ee48946a1 Mon Sep 17 00:00:00 2001 From: John Turner Date: Sat, 25 Mar 2023 03:35:46 -0400 Subject: [PATCH] show server socket name in modeline --- init/mode-line/init-mode-line.el | 7 ++++++- 1 file changed, 6 insertions(+), 1 deletion(-) diff --git a/init/mode-line/init-mode-line.el b/init/mode-line/init-mode-line.el index 44d3055..1846031 100644 --- a/init/mode-line/init-mode-line.el +++ b/init/mode-line/init-mode-line.el @@ -6,6 +6,11 @@ " " "(" mode-name ")" " " - "[" (:eval (abbreviate-file-name default-directory)) "]")) + "[" (:eval (abbreviate-file-name default-directory)) "]" + " " + "(" (:eval (if server-process + (process-name server-process) + "none")) + ")")) (provide 'init-mode-line)