Function: server-get-auth-key
server-get-auth-key is a byte-compiled function defined in
server.el.gz.
Signature
(server-get-auth-key)
Documentation
Return server's authentication key.
If server-auth-key is nil, just call server-generate-key.
Otherwise, if server-auth-key is a valid key, return it.
If the key is not valid, signal an error.
Source Code
;; Defined in /usr/src/emacs/lisp/server.el.gz
(defun server-get-auth-key ()
"Return server's authentication key.
If `server-auth-key' is nil, just call `server-generate-key'.
Otherwise, if `server-auth-key' is a valid key, return it.
If the key is not valid, signal an error."
(if server-auth-key
(if (string-match-p "^[!-~]\\{64\\}$" server-auth-key)
server-auth-key
(error "The key `%s' is invalid" server-auth-key))
(server-generate-key)))