From: Chong Yidong <cyd@stupidchicken.com>
Date: Fri, 23 Jan 2009 04:52:40 +0000 (+0000)
Subject: (server-name): Make it a defcustom.
X-Git-Tag: emacs-pretest-23.0.90~275
X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=77c4d02405dd9182559df7132d1e66f864d3f09b;p=emacs.git

(server-name): Make it a defcustom.
---

diff --git a/lisp/server.el b/lisp/server.el
index d58eb20e5e7..5f7cc50e35a 100644
--- a/lisp/server.el
+++ b/lisp/server.el
@@ -200,7 +200,13 @@ This means that the server should not kill the buffer when you say you
 are done with it in the server.")
 (make-variable-buffer-local 'server-existing-buffer)
 
-(defvar server-name "server")
+(defcustom server-name "server"
+  "The name of the Emacs server, if this Emacs process creates one.
+The command `server-start' makes use of this.  It should not be
+changed while a server is running."
+  :group 'server
+  :type 'string
+  :version "23.1")
 
 (defvar server-socket-dir
   (and (featurep 'make-network-process '(:family local))