Let EMACS_SERVER_NAME envvar change server-name
This commit is contained in:
parent
7c82cb6002
commit
a715f848aa
1 changed files with 2 additions and 0 deletions
|
@ -146,6 +146,8 @@ savehist file."
|
|||
:defer 1
|
||||
:after-call (pre-command-hook after-find-file)
|
||||
:config
|
||||
(when-let* ((name (getenv "EMACS_SERVER_NAME")))
|
||||
(setq server-name name))
|
||||
(unless (server-running-p)
|
||||
(server-start)))
|
||||
|
||||
|
|
Loading…
Add table
Add a link
Reference in a new issue