# HG changeset patch # User Glenn Morris # Date 1288161735 25200 # Node ID b508dbb6fb119312a5c2995e588f8e693d1e2c9d # Parent d0c566960277d0039edda327a5c2838882a21795 * server.el (server-host, server-port, server-auth-dir): Autoload risky. diff -r d0c566960277 -r b508dbb6fb11 lisp/ChangeLog --- a/lisp/ChangeLog Wed Oct 27 03:59:59 2010 +0000 +++ b/lisp/ChangeLog Tue Oct 26 23:42:15 2010 -0700 @@ -1,5 +1,7 @@ 2010-10-27 Glenn Morris + * server.el (server-host, server-port, server-auth-dir): Autoload risky. + * term/ns-win.el: Restore require of cl when compiling. (menu-bar-final-items): Remove non-existent `windows' menu. diff -r d0c566960277 -r b508dbb6fb11 lisp/server.el --- a/lisp/server.el Wed Oct 27 03:59:59 2010 +0000 +++ b/lisp/server.el Tue Oct 26 23:42:15 2010 -0700 @@ -110,16 +110,18 @@ (string :tag "Name or IP address") (const :tag "Local" nil)) :version "22.1") +;;;###autoload (put 'server-host 'risky-local-variable t) (defcustom server-port nil "The port number that the server process should listen on." :group 'server - :risky t :type '(choice (string :tag "Port number") (const :tag "Random" nil)) :version "24.1") +;;;###autoload +(put 'server-port 'risky-local-variable t) (defcustom server-auth-dir (locate-user-emacs-file "server/") "Directory for server authentication files. @@ -131,6 +133,7 @@ :group 'server :type 'directory :version "22.1") +;;;###autoload (put 'server-auth-dir 'risky-local-variable t) (defcustom server-raise-frame t @@ -1482,5 +1485,4 @@ (provide 'server) -;; arch-tag: 1f7ecb42-f00a-49f8-906d-61995d84c8d6 ;;; server.el ends here